Help for this page

Select Code to Download

Select or download this

___DATA___
#Pattern 1 - aaa <anything> bbb <anything> ccc <whitespaces> dddd
...
    xx
ccc
dddd

Select or download this

print  $#{[$lines =~ /aaa.*bbb.*ccc\s*dddd/gsi]} + 1 . "\n";