# Perl : list installed Perl modules
perl -MCPAN -e 'print CPAN::Shell->r '
# Perl : Hello World!
perl -e "print \"Hello World\!\n\";" # Win32+Linux perl -e "print \"Hello World!\n\";" # Win32 perl -e 'print "Hello World!\n;"' # Linux
# Perl : print O/S name
perl -e "print $^O"
# Perl : print UNIX time
perl -e 'print time();'
# Perl : print UTC time in standard format
use POSIX; my $datetime = strftime( '%Y-%m-%dT%H:%M:%SZ', gmtime); print $datetime."\n";
# Perl : generate big file
perl -e "open(F, '>10MiB.txt'); print F '0' x (1024*1024*10);" perl -e "open(F, '>10MB.txt'); print F '0' x (1000*1000*10);"
# Perl : decode base64 encoded file
perl -MMIME::Base64 -ne 'print decode_base64($_)' <file
# Perl : remove trailing CRLF by removing white spaces and the end of line
line =~ s/\s+$//g;
# Perl : md5 of string
perl -MDigest::MD5=md5_hex -e 'print md5_hex("0") . "\n";'
cfcd208495d565ef66e7dff9f98764da