1#!./perl 2 3BEGIN { 4 chdir 't' if -d 't'; 5 @INC = '.'; 6 push @INC, '../lib'; 7} 8 9use Tie::Array; 10tie @x,Tie::StdArray; 11require "op/push.t" 12