Select Code to Download

#!/usr/bin/env perl

...
    }
    return [@$aref[$start .. $stop]];
}

$ ./test
1..7
...
ok 5 - Testing: [-3:-1]
ok 6 - Testing: [-3:-3]
ok 7 - Testing: [3:-1]