Biblio-Thesaurus
5 results

 view release on metacpan or  search on metacpan

bin/thesaurus2tageditor  view on Meta::CPAN 

#!/usr/bin/perl

#undef $/;
$/='';

print "<html><body><pre>\n";
while(<>){
 chomp;
 if(/^(.*)\n/){
    print "<!-- $1 -->\nPt: $1\n";
    my $a = "$'\n";
    $a =~ s/(.+)\n/<!--        $1       -->\n/g;
    print "$a\n\n"
 }
}
print "</pre></body></html>\n";

 view all matches for this distribution
 view release on metacpan -  search on metacpan

( run in 0.833 second using v1.00-cache-2.02-grep-82fe00e-cpan-2c419f77a38b )