./redwolf.pl: line 5: use: command not found
./redwolf.pl: line 6: use: command not found
./redwolf.pl: line 9: BEGIN: command not found
./redwolf.pl: line 10: syntax error near unexpected token `$win32'
./redwolf.pl: line 10: `  my($win32)=1 if($^O eq 'MSWin32');'