Re^3: Add timestamp to file being copied.

Replies are listed 'Best First'.
Re^4: Add timestamp to file being copied. by Karger78 (Beadle) on Jun 09, 2009 at 18:53 UTC
Hello, Thanks for the help. I decided to go with the for loop way as it seems to work nicely. I made some changes as the time was a bit confusing however date seem to be a bit better on the eye's. I just relized that I also need to deal with .zip.meta files aswell. How could I change this so, if it's .zip then it renames it or if it's .zip.meta that it also renames the files to the time stamp aswell? `foreach my $upload (@uploads) { my $newName = $upload; $newName =~ s/\.zip$/-${mday}-${mon}-${year}.zip/; copy ($logSite . ${upload}, $localCpPath . $newName)or die "F +ailed to copy"; print "File $upload has been copied over and renamed $newName +\n"; $count++ }` [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re^4: Add timestamp to file being copied.
by Karger78 (Beadle) on Jun 09, 2009 at 18:53 UTC

foreach my $upload (@uploads) {
         my $newName = $upload;
         $newName =~ s/\.zip$/-${mday}-${mon}-${year}.zip/;
         copy ($logSite . ${upload}, $localCpPath . $newName)or die "F
+ailed to copy";
         print "File $upload has been copied over and renamed $newName
+\n";
         $count++
         }
[download]

[reply]
[d/l]