Paul Johnson schreef:
> sub half
> {
> my ($val) = @_;
> $val / 2;
> q/
> Returns $val divided by 2
> /;
> }
Variant:
sub half {
return unless defined $_[0];
return $_[0] / 2;
q/*
Returns
$val
divided
by 2
*/
}
q/*
This is
a multi-
line comment.
*/ if 0;
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
