Help for this page

Select Code to Download


  1. or download this
    package Exception;
sub TIESCALAR { bless {}, $_[0] }
...
Changing the value from 'blah' to 'blah' (not really)
blah
Now the value is : 42
  2. or download this
    # perl
package Exception;
...
        MAX = 7
        RITER = -1
        EITER = 0x0