- or download this
$text =~ /extractor/ # i.e. match anywhere in the string
- or download this
$text =~ /\G extractor/gc # i.e. match at current pos in string
- or download this
use Text::Balanced ':ALL';
...
use Data::Dumper 'Dumper';
print Dumper [ @data ];