Help for this page

Select Code to Download


  1. or download this
    #include "EXTERN.h"
    #include "perl.h"
    ...
          XPUSHs(sv_2mortal(newSVnv(tz_tm.tm_wday)));
          XPUSHs(sv_2mortal(newSVnv(tz_tm.tm_yday)));
          XPUSHs(sv_2mortal(newSVnv(tz_tm.tm_isdst)));
    
  2. or download this
    #!/usr/bin/perl
    
    ...
    
        
    }
    
  3. or download this
    $ ./mt-demo.pl
    in thread (Europe/Paris): 2009-11-24 23:27:28
    ...
    main (Europe/Paris): Tue Nov 24 23:27:28 2009
    main (Europe/Moscow): Wed Nov 25 01:27:28 2009