Create Directory, 'cd' to it and download a file pipeline in Perl
Posted
by neversaint
on Stack Overflow
See other posts from Stack Overflow
or by neversaint
Published on 2010-05-25T08:16:02Z
Indexed on
2010/05/25
8:21 UTC
Read the original article
Hit count: 191
I have a file that looks like this:
ftp://url1/files1.tar.gz dir1
ftp://url2/files2.txt dir2
.... many more...
What I want to do are these steps:
- Create directory based on column 2
- Unix 'cd' to that directory
- Download file with 'wget' based on column1
But how come this approach of mine doesn't work
while(<>) {
chomp;
my ($url,$dir) = split(/\t/,$_);
system("mkdir $dir");
system("cd $dir"); # Fail here
system("wget $url"); # here too
}
What's the right way to do it?
© Stack Overflow or respective owner