Arrow test:
class = Foo
$VAR1 = bless( {}, 'Foo' );


Colon test:
Use of uninitialized value in concatenation (.) or string at Foo.pm line 9.
class =
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' );