Help for this page

Select Code to Download


  1. or download this
    #! perl
use strict;
...

print "\nIn file '$filename', the FAVOURITE flag is ",
      ($favourite ? 'SET' : 'NOT SET'), "\n";
  2. or download this
    12:53 >perl 610_SoPW.pl

In file 'mymessage.1004', the FAVOURITE flag is NOT SET

12:57 >