Help for this page

Select Code to Download


  1. or download this
    END { print " \n" }
sub I { $_ }
...
    $XVI += I and print III $XVI
}
__END__
  2. or download this
    END { print " \n" } 
sub b { $_ } 
...
    $t += b and print d $t
}
__END__
  3. or download this
    END { print " \n" }
sub b { $_ }
...
        print chr $t
}
__END__
  4. or download this
    END { print " \n" }
my $t = 1;
...
    print chr ($t += $_);
}
__END__