Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

revdiablo's scratchpad

by revdiablo (Prior)
on Jun 01, 2004 at 17:23 UTC ( [id://358283]=scratchpad: print w/replies, xml ) Need Help??

Copying variables the hacktastic way:
#!/usr/bin/perl -l sub foo { open "/foo"; print 0+$!, " $!"; print 0+$_[0], " $_[0]"; } # not copied mkdir "/foo"; foo $!; print "---"; # copied with string interpolation mkdir "/foo"; foo "$!"; print "---"; # copied with temp scalar mkdir "/foo"; foo ${ \(my $t = $!) }; print "---"; # copied with array deref mkdir "/foo"; foo @{[$!]};

And the output:

2 No such file or directory 2 No such file or directory --- 2 No such file or directory 0 Permission denied --- 2 No such file or directory 13 Permission denied --- 2 No such file or directory 13 Permission denied
Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others exploiting the Monastery: (5)
As of 2025-06-19 10:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    erzuuliAnonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.