$scp = Net::SCP->new( "155.226.205.195", "metrica"); $scp->get("/apps/instl/metrica/sample.txt") or die $scp->{errstr};