Windows 10: Powershell script to copy files in order; lost the thread

I'm searching for an old thread in vain. Pretty sure it was in this or the TENFORUM. I had some great help from one of the gurus. He wrote me a Powershell script that I've used successfully to copy files from File Explorer to an SD card in the order in which they are organised within File Explorer. The application that uses the SD card assigns an 'index' based exclusively on the order in which the files are copied. Copy/pasting, dragging etc proves unreliable for some obscure reason. But the script always does it correctly. However it sems it does not copy folders a their files. I'll describe

:)

 

Create a PowerShell script to create a copy

I am trying to build a process to copy the folders and files on a folder on my computer. I want to create a script using PowerShell so that I can use it from Scheduler to do this consistently. I am unsure how to set up a script to allow this to happen.

Any help is greatly appreciated.

 

PowerShell Script not getting right PDF filename for Recent?

I suggest this thread ought to be deleted because the OP has also posted the question in the most appropriate place which is in the thread within which that script was proposed. Denis

 

Script can copy file directory in one spot but not the other

Haha yeah its fred. sorry its 8am and my mind isnt fully functional yet. There is an error along side the one my script posts: No such file or directory at script line 20.(which is the copy line). I pointed the script to one of the sub directories exactly, still wouldnt copy. I created a new sub dir, and copied some of the files from the main directory into the new directory, those wouldnt copy either.

script:
Code: #!/usr/bin/perl -w use strict; use warnings; use File::Find; use File::Copy; my $directory="..\\..\\doc\\xsd"; find (\&subr, $directory); sub subr { foreach ($File::Find::name=~/(.*)\.xsd$/) { my $filetobecopied = $File::Find::name; my $newfile = $1 . ".origxsd"; copy($filetobecopied, $newfile) or die "$File::Find::name cannot be copied $!"; chmod 0777, $File::Find::name; open (FILE, "<", $File::Find::name) or die "Cannot open file $!"; print $File::Find::name. "\n"; local $/; my $file=<FILE>; $f=~s/<!--[\w\W^]*?-->//gi; close FILE; open (OUT, ">", $File::Find::name) or die "Cannot write to file $!"; print OUT $f; close OUT; chmod 0444, $File::Find::name; } }[/quote] thanks kreij