[Bps-public-commit] r11390 - SVN-PropDB/lib/Prophet/Test

[clkao at bestpractical.com]

Author: clkao
Date: Wed Apr  2 06:34:21 2008
New Revision: 11390

Modified:
   SVN-PropDB/lib/Prophet/Test/Participant.pm

Log:
no io::string.


Modified: SVN-PropDB/lib/Prophet/Test/Participant.pm
==============================================================================
--- SVN-PropDB/lib/Prophet/Test/Participant.pm	(original)
+++ SVN-PropDB/lib/Prophet/Test/Participant.pm	Wed Apr  2 06:34:21 2008
@@ -185,8 +185,8 @@
     my $cli = Prophet::CLI->new();
     $cli->parse_record_cmd_args();
 
-    my $str;
-    my $str_fh = IO::String->new($str);
+    my $str = '';
+    open my $str_fh, '>', \$str;
 
     my $old_fh = select($str_fh);