Select Code to Download

# this is the file Foo.pm
package Foo;
...
    print Dumper($colon_foo);

}

Arrow test:
class = Foo
...
Use of uninitialized value in bless at Foo.pm line 13.
Explicit blessing to '' (assuming package main) at Foo.pm line 13.
$VAR1 = bless( {}, 'main' );