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");
	}
	}