$grep_date="$mon $arr[2]"; print "$grep_date\n"; my $files=system(q(cd /waslogs1/vfoneLog/cposapp && ls -lrt | grep -i "$grep_date" | awk '{ print $9 }' > /home/cpos/CRM_Reports/output/filelist.txt));