in reply to Have I found a bug in Perl?
UNIVERSAL::can( $foo, 'can' ); [download]
Makeshifts last the longest.