Help for this page

Select Code to Download


  1. or download this
    defined( my $s = -s $qfn )
   or die( "Can't stat `$qfn`: $!\n" );

... $s ...
  2. or download this
    stat( $qfn )
   or die( "Can't stat `$qfn`: $!\n" );

... -s _ ...
  3. or download this
    defined( my $s = ( stat( $qfn ) )[ 7 ] )
   or die( "Can't stat `$qfn`: $!\n" );

... $s ...