use Net::SFTP;

my $ftp_data = {
    host     => '<take from project/view>',
    user     => '<take from project/view>',
    password => '<take from project/view>',
    mode     => 'sftp',
};

if ($ftp_data->{mode} eq 'sftp') {

    my %options = (
        user     => $ftp_data->{user},
        password => $ftp_data->{password},
        debug    => 1,
    );

    my $sftp = Net::SFTP->new($ftp_data->{host}, %options);

    $sftp->login($ftp_data->{user}, $ftp_data->{password});

}