##################################
# Author: serj (mservers.org.ua) #
# Date: 18.02.2014               #
##################################

use Net::FTP;

$ftp_server='';
$ftp_login='';
$ftp_pass='';
$ftp_dir='addons/amxmodx/data/';
$ftp = Net::FTP->new($ftp_server, Timeout => 30, Debug => 0) || die "$!\n";
$ftp->login($ftp_login, $ftp_pass) || die "$!\n";
$ftp->binary();
$ftp->cwd($ftp_dir) || die "$!\n";
$ftp->get("csstats.dat", "csstats.dat") || die "$!\n";
$ftp->quit();