sub mysub {

my ($var1) = @_;
$ssh->exec("cmd1");
$ssh->exec("cmd2");
open my $prep, '<', $var1;
while (my $config = <$prep>)
{
chomp $config;
my $conf =  $ssh->exec("$config");
print("$conf");

}

mysub("config.txt");