Sorry, obviously the code is supposed to read:

opendir( DIR1, ".");
@before = readdir(DIR1);
closedir(DIR1);

# Execute a command that backs up every file in the directory
# with a .bak extension.

opendir( DIR2, ".");
@after = readdir(DIR2);
closedir(DIR2);

It still doesn't work.

daniel

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to