in reply to compressing files

Wouldn't
@srcfiles = qw(/home/Scripts/Perl/abcd.txt /home/Scripts/Perl/Test.pl /home/Scripts/Perl/checkingString.ksh);
be more in line with what you mean? Right now, in the foreach you'll only see one $file and it will have spaces in it.