Question:

What gets printed?

package A;
sub NEW { bless {}, shift }
sub AUTOLOAD { print ref(shift) }

package main;

my $obj = NEW A;

$obj->foo();

Answers:


Keywords:

© 2017 QuizBucket.org