brian54321uk wrote:
brian54321uk wrote:
Rob Dixon wrote:
brian54321uk wrote:
Hi, I'm stuck with what will probably turn out to be a simple
solution, I've been scouring google for ages, and can't find
anything close to what I'm looking for.
Given that
$fred = 10
$barney = abcdefghijklmn
how do I get $wilma = j
my $wilma = substr $barney, $fred-1, 1;
Rob
Taking this one step further, if I may.
If foldername 10 does not exist, but j.txt does exist, what would be
the simplest way of using a combo of mkdir and copying j.txt to the
newly created foldername 10 ?
Thanks again.
Brian
I've managed to sort out the directory problem with:
if( -d $fred)
{
#dir exist
print "directory: $fred exists already\n";
die;
}
#dir not-exist
else {
mkdir $fred;
print "directory: $fred has been created\n";
}
Job done, copying the file was far easier than I first imagined, (isn't
google wonderful ;-) )
Thanks for helping fire the synapses though.
Brian
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
