Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
@all = ($love{'fair'}, $war{'fair'});
  2. or download this
    #!/usr/bin/perl
$love{'all'}='fair';
$war {'all'}='fair';
  3. or download this
    #!/usr/bin/perl
$love{'all'}='fair';
...
sub war {
    print "All is fair in love and war.";
}