Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

fraterm's scratchpad

by fraterm (Scribe)
on Jun 05, 2004 at 10:09 UTC ( #361444=scratchpad: print w/ replies, xml ) Need Help??

My Regex Commenting Convention:
Say i have a regex that might look pretty hairy to the uninitiated.
$calar =~ tr/\/{1,}//; #############$1----###

Might need some clarification but, this is a scratchpad after all...
Tricking the File::Find::dir "&wanted" routine Dynamically:

One Liner to get the size of a file in bytes.
perl -e '$size=(stat("/etc/profile"))[7];' -e 'print "size:[".$size."]bytes\n";'
MIME::Base64 basic use
use warnings; use strict; use MIME::Base64; sub mimencode($); my $inputstring = $ARGV[0]; my $outputstring = mimencode($inputstring); print "input:$inputstring\n"; print "output:$outputstring\n"; sub mimencode($){ my $in = shift; my $out = ''; $out = MIME::Base64::encode_base64($in); return $out; }
Log In?

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

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (11)
As of 2015-10-07 16:52 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (191 votes), past polls