in reply to Delete till end of line to another string

hi try out this one... while($line=<DATA>){ $line=~s/<\s+\w+//g; $line=~s/<\s+//g; print $line; }
  • Comment on Re: Delete till end of line to another string

In Section Seekers of Perl Wisdom