Help for this page

Select Code to Download


  1. or download this
    perl -e '$mystring="CONTENT- TYPE\n"; $mystring=~s/(.*)/{my $foo= $1; 
+$foo=~s\/N\/ \/; "$foo"}/e; print $mystring;'
#prints
CO TENT- TYPE
  2. or download this
    perl -e '$mystring="CONTENT- TYPE\n"; $mystring=~s/(.*)/{my $foo= $1; 
+$foo=~s\/\n\/ \/; "$foo"}/se; print $mystring;'