Lines Matching refs:text
33 my $text = $t->fill_in();
34 is $text, 'package is main';
37 $text = $t->fill_in(PACKAGE => 'Q');
38 is $text, 'package is Q';
42 $text = $t->fill_in(SAFE => $c);
43 is $text, 'package is safe root';
49 $text = $t->fill_in(SAFE => $c, PACKAGE => 'Q');
50 is $text, 'package is Q';
59 $text = $t->fill_in(HASH => { H => 'good5' });
60 is $text, 'hash is good5';
66 $text = $t->fill_in(HASH => { H => 'good6' }, PACKAGE => 'Q');
67 is $text, 'hash is good6';
72 $text = $t->fill_in(HASH => { H => 'good7' }, SAFE => $c);
73 is $text, 'hash is good7';
81 $text = $t->fill_in(HASH => { H => 'good8' }, SAFE => $c, PACKAGE => 'Q2');
82 is $text, 'hash is good8';