---

Hej

Hvad er foreskelden på at kalde en subrutine med

&getinput;
eller
getinput()

mvh Claus

---

"Claus" <descent@earthling.net> writes:

> Hvad er foreskelden på at kalde en subrutine med
>
> &getinput;
> eller
> getinput()

Proev det, proev det!

#!/usr/bin/perl -w

din_test("foo","bar","baz");

sub din_test {
print "test 1\n";
&min_test;
print "\ntest 2\n";
min_test();
}

sub min_test {
if (@_) {
print "min_test blev kaldt med parametrene: ",
join(" / ", @_), "\n";
}
else {
print "min_test blev kaldt uden parametre\n";
}
}


(&getinput sender @_ videre til den naeste subrutine).


- ask

--
ask bjoern hansen, http://ask.netcetera.dk/ !try; do();

---

Ask Bjoern Hansen <ask@netcetera.dk> writes:

> "Claus" <descent@earthling.net> writes:
>
> > Hvad er foreskelden på at kalde en subrutine med
> >
> > &getinput;
> > eller
> > getinput()
>
> Proev det, proev det!
>
[ snip ]
>
> (&getinput sender @_ videre til den naeste subrutine).

(hviske-hviske: _og_ &getinput; skider paa en eventuel prototype.
Hvis du har erklaeret getinput() f.eks. saadan:

sub getinput ( $ );

saa kan du ikke kalde den som getinput(), men du kan godt kalde den som
&getinput.

Check evt man perlsub

--
Jakob

---

Ask Bjoern Hansen <ask@netcetera.dk> skrev i
meldingsnyheter:87u216wqey.fsf@onion.valueclick.com...
> "Claus" <descent@earthling.net> writes:
>> Hvad er foreskelden på at kalde en subrutine med
>> &getinput;
>> eller
>> getinput()
> Proev det, proev det!
> (&getinput sender @_ videre til den naeste subrutine).

I serien "subtle differences" har vi nå kommet til "list references" ;)

$, = ", ";
$\ = "\n";
sub func () { 42 }
print map ref $_, \(&func(), &func, func(), func)'

--
Trond Michelsen

---

"Trond Michelsen" <trondmm-usenet@crusaders.no> wrote in message
news:nPnZ6.7244$qR5.720703@news01.chello.no...
> I serien "subtle differences" har vi nå kommet til "list references"
;)
>
> $, = ", ";
> $\ = "\n";
> sub func () { 42 }
> print map ref $_, \(&func(), &func, func(), func)'

Hmm, den siste linjen skulle selvsagt være

print map ref $_, \(&func(), &func, func(), func);

Anyway. Denne koden gir følgende output:

SCALAR, CODE, SCALAR, SCALAR

--
Trond Michelsen