Help for this page

Select Code to Download


  1. or download this
    #! perl -w
    use strict;
    
    ...
    my $lex = Test->new();
    $lex->balance_by('bar');
    print $lex->balance_by();
    
  2. or download this
    print $lex->balance_by('baz')