- or download this
perl -ane '$s = "";
foreach (@F) { /(\d+)-(\d+)/ and $2 - $1 >= 30 and $s .= " $1-$2" }
print "$F[0]$s\n" if $s' input.txt
- or download this
C:\Users\Desktop\x\New folder>perl -ane '$s = "";
Can't find string terminator "'" anywhere before EOF at -e line 1.
...
30 and $s .= " $1-$2" }
'foreach' is not recognized as an internal or external command,
operable program or batch file.
- or download this
perl -ane '$s = ""; foreach (@F) { /(\d+)-(\d+)/ and $2 - $1 >= 30 and
+ $s .= " $1-$2" } print "$F[0]$s\n" if $s' input.txt
- or download this
Can't find string terminator "'" anywhere before EOF at -e line 1.