#!/usr/bin/perl -w
use strict;
use 5.010;
use lib "template_stuff";
use File::Basename; 
use Net::SSH2;
use File::Spec;
use Term::ReadKey;

my $rftp = get_ftp_object();
say "object created, back in main";