my $line = "a whole lotta shakin >pattern here< goin on";