Searched refs:OverridenPop (Results 1 - 1 of 1) sorted by relevance

/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Doverride.t93 BEGIN { *OverridenPop::pop = sub { ::is( $_[0][0], "ok" ) }; }
94 package OverridenPop; package
96 pop( OverridenPop->foo() );
97 pop OverridenPop->foo();

Completed in 40 milliseconds