Howdy: I'm having problems trying to parse out part of a directory into variables.
I start with this: [snip script] /usr/local/bin/perl -w use diagnostics; my $dest="/i/'Depression Management'/Mailing/dec2002_iso_images"; # Where is data coming from? my $source="/i/'Depression Management'/Mailing/Dec2002"; foreach $group ( split(/\n/,`ls -d1 $source/06/*`) ) { print $group, "\n"; } [/snip script] And this is the results: [snip results] /i/Local Test Dir/Mail/December2002/06/first workgroup (emi).pdf /i/Local Test Dir/Mail/December2002/06/prof arrange (test).pdf . . . . . . [/snip results] What I want is to parse out the path into 3 variables: [broken logic] foreach my $group ( split(/\n/,`ls -d1 $source/0*/*`) ) { ($bu, $pcgname)=($group =~ m/$source\/(0\d)\/(.*)/i); [/broken logic] How can I split $group in to $source, any number (06 in this example) and any file name listed after that (which will most likely include white spaces in the names)? In the above, I thought I was only getting the digit and everything else into the TWO variables (but I guess not) ... Thanks for any suggestions! -X