File: filter_for_5.005

package info (click to toggle)
libxml-twig-perl 1:3.32-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 1,988 kB
  • ctags: 806
  • sloc: perl: 17,411; xml: 202; makefile: 18
file content (3 lines) | stat: -rw-r--r-- 208 bytes parent folder | download | duplicates (7)
1
2
3
# $Id: /xmltwig/trunk/filter_for_5.005 4 2007-03-16T12:16:25.259192Z mrodrigu  $
if( $] < 5.006)  { s{^(\s*)no warnings;}{$1# no warnings;}; }
else             { s{^(\s*)# no warnings; }{$1no warnings;};   }