Select Code to Download

The Questions

        perlfaq1: General Questions About Perl
...
        perlfaq7: General Perl Language Issues
        perlfaq8: System Interaction
        perlfaq9: Networking

Found in /System/Library/Perl/5.10.0/pods/perlfaq4.pod
       How can I find the Julian Day?

...
               $ perl −MDateTime −le'print DateTime−
+>today−>doy'
               30
               

       map BLOCK LIST
       map EXPR,LIST
...
                   %hash = map { ("\L$_", 1) } @array  # this also wor
+ks
                   %hash = map {  lc($_), 1  } @array  # as does this.
                   %hash = map +( lc($_), 1 ), @array  # this is EXPR 
+and works!

use strict;
use warnings;
use diagnostics;