Began refactoring tests using Test::Routine

So far only the first test (001) has been converted
Converted two more tests to Test::Routine