Upgrade to Module-Build-0.2808
[p5sagit/p5-mst-13.2.git] / lib / Tie / Array / splice.t
1 #!./perl
2
3 BEGIN {
4     chdir 't' if -d 't';
5     @INC = '.'; 
6     push @INC, '../lib';
7 }
8
9 # bug id 20001020.002
10 # -dlc 20001021
11
12 use Tie::Array;
13 tie @a,Tie::StdArray;
14 undef *Tie::StdArray::SPLICE;
15 require "op/splice.t"
16
17 # Pre-fix, this failed tests 6-9