> cat test.pl |grep -v "^test" > testfile
> perl testfile; prove testfile