Phoenix.pm: Code problem
David Sinck
sinck at ip100.corp.quepasa.com
Tue Oct 12 20:12:03 CDT 1999
\_
\_ open ( IN_FILE, $in_file ) || die ........
\_ open ( OUT_FILE, "> $out_file" ) || die .......
\_ while ( <IN_FILE> )
\_ {
\_ print OUT_FILE $_ ;
\_ $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ;
\_ print "Unix word count = $size\n" ;
\_ }
\_ close ....
\_ close ....
as a last hope, is $out_file a relative path'd file or is it absolute
from the root?
David
More information about the Phoenix-pm
mailing list