zilore mumba wrote:
>> Thanks so much for all who assisted me with my script, and
>> more especially Bill Luebkert. The script now works, but I
>> have a minor problem. Sorry for sending so much code, but
>> see my comments within the code for the minor problem.
>>
>> The file does not move (and no error is indicated).
>> Assistance please.
>> while (<$file>) { rename "$file", "$base_dir/$dat" or warn
>> "rename '$file' failed: $! ($^E)";}
Try using File::Copy.
--
Henry
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
