print "The 'bar' attribute of object 'foo' is @{[ $foo->bar() ]};\n";