On Jul 21, [EMAIL PROTECTED] said:
ok thanks but that does not really help. Sorry.
your right about finger(), but based on my code I want to execute a certain
block label
if ( mary)
finger (mary)
if (jim)
finger(jim)
Oh, then in that case:
finger($user);
# ...
sub finger {
my $who = shift;
open GPG, ...;
if ($who eq 'mary') {
# ...
}
elsif ($who eq 'jim') {
# ...
}
close GPG;
}
--
Jeff "japhy" Pinyan % How can we ever be the sold short or
RPI Acacia Brother #734 % the cheated, we who for every service
http://japhy.perlmonk.org/ % have long ago been overpaid?
http://www.perlmonks.org/ % -- Meister Eckhart
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>