Help for this page

Select Code to Download


  1. or download this
    $find = Swish->new(
  "'",  # ignore beginning
...
  5,  # words to highlight AFTER
);
de>
  2. or download this
    $find->stream(\*DATA, sub { " ... $_[1]<b>$_[2]</b>$_[3] ..." });
while (my $t = $find->match) { print "[[$t]]\n" }
  3. or download this
    keywords are: <breath> <every> 

...
If I'm already numb
That's what you do to control me
]]
  4. or download this
    With <b>every</b> form you come ...
hypnotize me
With <b>every</b> <b>breath</b> I take
You're ...