Help for this page

Select Code to Download


  1. or download this
    package MyCal::DoStuff;
    
    use 5.012003;
    ...
    
    =cut
    
  2. or download this
    #!/usr/bin/perl
    use strict;
    use warnings;
    ...
    print "results of sub are random number $rno and result $res \n";
        
    exit;
    
  3. or download this
    dbdev2:~ johnson$ perl test
    Can't locate auto/MyCal/DoStuff/autosplit.ix in @INC (@INC contains: /
    +Users/johnson/MyCal-DoStuff/lib /opt/local/lib/perl5/site_perl/5.12.3
    +/darwin-multi-2level /opt/local/lib/perl5/site_perl/5.12.3 /opt/local
    +/lib/perl5/vendor_perl/5.12.3/darwin-multi-2level /opt/local/lib/perl
    +5/vendor_perl/5.12.3 /opt/local/lib/perl5/5.12.3/darwin-multi-2level 
    +/opt/local/lib/perl5/5.12.3 /opt/local/lib/perl5/site_perl /opt/local
    +/lib/perl5/vendor_perl .) at /opt/local/lib/perl5/5.12.3/AutoLoader.p
    +m line 173.
     at /Users/johnson/MyCal-DoStuff/lib/MyCal/DoStuff.pm line 8
    a = 45 
    results of sub are random number 14 and result 72.8