Hi! If there is not much trouble I would like to ask something myself. I searched but found nothing on this. I use the code below to get something from FTP but I can't abort(). I want to be able to read from <STDIN> while downloading and if the command is abort then stop the transfer. Can you see anything wrong in my code? Thanks
sub getfile(){ my $file = $_[0]; my $pid; if (!defined($pid = fork())) { die "cannot fork: $!"; } elsif ($pid) { while (1){ my $command = <STDIN>; chomp($command); if($command =~ m/^\s*abort\s*/){ $ftp->abort(); last; } } } else { $ftp->get($file); } }
In reply to Aborting ftp by intrance
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |