Help for this page
#/usr/bin/perl -w use strict; ... my @lines = $ftp->dir(); print join("\n", @lines), "\n";
C:\WINDOWS\Profiles\Gregory\Desktop\LLPSV>perl rpasafe.pl C:\WINDOWS\Profiles\Gregory\Desktop\LLPSV>