Checking if your kit is complete... Looks good Writing Makefile for Text::Starfish Microsoft (R) Program Maintenance Utility Version 7.10.3077 Copyright (C) Microsoft Corporation. All rights reserved. cp Starfish.pm blib\lib\Text\Starfish.pm C:\cpanrun\build\5-10-0\bin\perl.exe -MExtUtils::Command -e cp starfish blib\script\starfish pl2bat.bat blib\script\starfish Microsoft (R) Program Maintenance Utility Version 7.10.3077 Copyright (C) Microsoft Corporation. All rights reserved. C:\cpanrun\build\5-10-0\bin\perl.exe -MExtUtils::Command -e cp starfish blib\script\starfish pl2bat.bat blib\script\starfish C:\cpanrun\build\5-10-0\bin\perl.exe "-Iblib\lib" "-Iblib\arch" test.pl 1..5 # Running under perl version 5.010000 for MSWin32 # Win32::BuildNumber 1001 # Current time local: Wed Jan 2 17:11:14 2008 # Current time GMT: Thu Jan 3 01:11:14 2008 # Using Test.pm version 1.25 ok 1 not ok 2 # Test 2 got: "\nTesting Hook adding:\n\n#\n\n# some normal text\n\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcatSD}(\\w*)>/g) { and so on \"d$1\";}\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcatSDii}(\\w*)>/ig) { and so on \"d$1\";}\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcatSDi}(\\w*)>/ig) { NEW \"d$1\";}\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcat}(\\w*)>/g) { and so on \"d$1\";}\n\nTest finished.\n\n\n\n# This is a comment\n\n # This is not a comment\n" (test.pl at line 154) # Expected: "\nTesting Hook adding:\n\n#\n\n# some normal text\n\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcatSD}(\\w*)>/g) { and so on \"d$1\";}\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcatSDii}(\\w*)>/ig) { and so on \"d$1\";}\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcatSDi}(\\w*)>/ig) { NEW \"d$1\";}\nwhile (/\\b$Qrel\\b[ ,\\w]*<${wQcat}(\\w*)>/g) { and so on \"d$1\";}\n\nTest finished.\n\n\n\n\n\n # This is not a comment\n" # Line 17 is changed: # - "\n" # + "# This is a comment\n" # test.pl line 154 is: if (! ok(getfile($f2), getfile($f1)) ) Files: ../testfiles/01.out and 01.out not ok 3 # Test 3 got: "\n
\n