Parameter an Modul übergeben (wieder mal :o( )

[Manuel Burghammer]

tagchen,

ich rufe mein modul auf mit &FORM::welcome_message($session);

in der FORM.pm steht

package FORM;

sub welcome_message
{
my $session = shift;
print "Willkommen\n";
print "<br><br><a href="/cgi-bin/mddl_ftcom.cgi?user_id=$user_id&session_id=$session&execute=logout">Logout</a>\n";
}

---- snip -----

1;

kann ich mit dieser methode auf zwei variablem uebergeben ?? z.b. &FORM::welcome_message($session, $user_id);

ich habs versucht aber ich brings nicht hin...auch selfhtml (tq.htm) hat mir nicht geholfen :o(

danke fuer eure hilfe

SoLong M.

[Calocybe]

Auch Tag!

kann ich mit dieser methode auf zwei variablem uebergeben ?? z.b. &FORM::welcome_message($session, $user_id);

Ja natuerlich kannsr Du das, warum denn auch nicht? Musst haltr den zweiten Parameter in der Funktion auch noch rein-shift-en, genauso wie den ersten. Oder Du schreibst stattdessen soetwas:

my ($session, $user_id) = @_;

Ist mal wieder Geschmackssache, welche Variante Du nimmst (es gibt noch weitere), wie so oft bei Perl.

So long