Help for this page

Select Code to Download


  1. or download this
    
Can't modify subroutine entry in scalar assignment at C:\Perl\lib/POSI
+X.pm line
3, near ");"
BEGIN not safe after errors--compilation aborted at C:\Perl\lib/POSIX.
+pm line 5. 
BEGIN failed--compilation aborted at ftp_Invent.pl line 11.
  2. or download this
    
#!/usr/local/bin/perl -w
...
my $now_string;
$now_string = strftime '%Y%m%d.%H%M%S', localtime;
my $now_string2 = strftime '%Y%m%d%H%M%S', localtime;