Help for this page

Select Code to Download


  1. or download this
    #! /usr/bin/perl -lw

...
cat ('o1', *OUT ) or die "Can't cat o1: $!";
cat ('o2', *OUT ) or die "Can't cat o2: $!";
close OUT ;
  2. or download this
    this line is from o1

this line is from o2
  3. or download this
    this line is from o1
this line is from o2