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

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/base/t/
H A Dfields.t42 eval q(my Foo $obj = Foo->new; $obj->{notthere} = "");
44 my $error = $Has_PH ? 'No such(?: [\w-]+)? field "notthere"'
45 : q[Attempt to access disallowed key 'notthere' in a ].
H A Dfields-base.t159 eval q(my D3 $obj3 = $obj2; $obj3->{notthere} = "");
162 qr/^No such pseudo-hash field "notthere" in variable \$obj3 of type D3/;
166 qr/^Attempt to access disallowed key 'notthere' in a restricted hash/;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/
H A DConstant.t559 my $notthere = eval { &ExtTest::NOTTHERE; };
560 if (defined $notthere) {
561 print "not ok 13 # \$notthere='$notthere'\n";

Completed in 28 milliseconds