Help for this page
my ($user, $lib) = qw(/home/john /lib); sub directs { my $count; ... } print directs( $user, $lib), ' files deleted.', $/;
{ local $/ = '<br />'; foo(@args); }
www.com | www.net | www.org
No recent polls found