Select Code to Download

#!/usr/bin/pugs
# Demo of the state() variable declaration.
...
$drawer[1]<add>( 59 );
$drawer[2]<del>( 17 );
say $drawer[3]<bal>();  # This should say "42"

sub foo () {
    state %seen;
    # ...
}