[Gike]

$a='ftp://login:pass@host.com';
$a=~/ftp:\/\/(.*):(.*)\@(.*)/g;
$login=$1;
$pass=$2;
$host=$3;