Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Golf: Fix de facto HTML comments

by bageler (Hermit)
on Jul 19, 2004 at 02:12 UTC ( #375448=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    #2345678 1 2345678 2 2345678 3 2345678 4 2345678 5 23456
    s/<!--(.*?)-->/(my$x=$1)=~s!-(-?)!$1.!g;"<!--$x-->"/egs;
    
  2. or download this
    #2345678 1 2345678 2 2345678 3 2345678 4 2345678 5 23456
    s/<!--(.*?)-->/($_=$1)=~s!-(-?)!$1.!g;"<!--$_-->"/egs;
    
  3. or download this
    #2345678 1 2345678 2 2345678 3 2345678 4 2345678 5 23456
    s/<!--(.*?)-->/($_=$1)=~s!-(-+?)!$1.!g;"<!--$_-->"/egs;