Help for this page

Select Code to Download


  1. or download this
    # 692459.pl
    use strict;
    ...
        print HANDLE "....";
    }
    __END__
    
  2. or download this
    # 692459.t
    
    ...
    ok(-s $f, q{file's size is non-zero});
    cmp_ok(unlink($f), q{==}, 1, q{Delete 1 file});
    __END__
    
  3. or download this
    C:\src\perl\perlmonks\692459>prove 692459.t
    692459....ok
    ...
    C:\src\perl\perlmonks\692459>perl -v
    
    This is perl, v5.8.8 built for MSWin32-x86-multi-thread