Help for this page

Select Code to Download


  1. or download this
      DB<267> x qq\@{[ (sort grep { $_ gt '[' } %::)[0] ]}\; 
0  '\\'
  DB<268> x qq\@{[ grep { '[' lt $_ lt ']' } %:: ]}\; 
0  '\\'
  DB<269>
  2. or download this
    print  "\\\n" eq
  qq\@{[<<'']}\;
\

# is there an easy way to chomp a here doc?