my @LIBS = ("lib1", "lib2", "lib3");
my $MACHINES_PATH = $ENV{'SYSTEM_HOME'};
my $LIBS_PATH = $MACHINES_PATH."/testlib";
my $MACHINES_LIST = $MACHINES_PATH."/machines.txt";
my $SSH_USER = "abc";
my $SSH_CMD = "/usr/bin/ssh";

open (MYFILE,"<$MACHINES_LIST") or die "Could not open the file $MACHINES_LIST, $!";
	my @HOSTS = <MYFILE>;
		foreach my $BOX (@HOSTS) {
		chomp $BOX;
	`$SSH_CMD $SSH_USER\@$BOX -o BatchMode=yes ConnectionAttempts=5 ConnectTimeout=5 \"cd $LIBS_PATH \&\& files_DEL(@LIBS)"`;
	}

sub files_DEL {
	my @LIB_FILES = shift;
		foreach my $lib (@LIB_FILES) {
		print "deleting file $lib\n";
		system("rm -rf $lib");
	}
	}

##</code><code>##

xx@sbi-126:/x02/abc>./filedel.pl 
bash: -c: line 0: syntax error near unexpected token `libcudart.so.4.1.28'
bash: -c: line 0: `ConnectionAttempts=5 ConnectTimeout=5 cd /x02/abc/testlib && files_DEL(lib1 lib2 lib3)'
ssh: Could not resolve hostname : Name or service not known
xx@sbi-126:/x02/abc>