foreach my $min (20 .. 29) { foreach my $sec (@seconds) { my $SMPP_count = split (/[\s]/,(chomp(`cut -d "|" -f 1,10,13 SMSCDR*$date$hour$minute*.log |grep "Submit|SMPP" |grep "$hour:$min:$sec" |sort |uniq -c`)))[0]; print $SMPP_count; } } #### Can't modify quoted execution (``, qx) in chomp at second.pl line 24, near "`cut -d "|" -f 1,10,13 SMSCDR*$date$hour$minute*.log |grep "Submit|SMPP" |grep "$hour:$min:$sec" |sort |uniq -c`)" syntax error at second.pl line 24, near ")[" Global symbol "$SMPP_count" requires explicit package name at second.pl line 25. Execution of second.pl aborted due to compilation errors.