Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
  @state > 1 and die "missing close tag for $state[-1][0]";
  return $_;
  }

Select or download this

word1  word2 word3 word4 word5  word6 word9  word11
word1  word6 word9 word10 word11
word1  word6 word7 word8word9 word10 word11