I want the result in new lines. can someone help with that ? but when i print it with new line i get an error Modification of a read-only value attempted at - line 5, <FILE> line 1. Any ideas how to fix this ?open (FILE,"abc345.txt") or die $!; while (<FILE>){ $_ = /((^Query = .*)|(^\>.*)|(Length = .*))/i; print $1 "\n"; print $2 "\n"; print $3 "\n"; print $4 "\n"; } close (FILE) ;
can anybody tell me how to get just the first 4 matches for all the regex?
In reply to add new lines to output. by shaludr
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |