File: filter_for_5.005

package info (click to toggle)
libxml-twig-perl 1:3.52-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, sid
  • size: 4,952 kB
  • sloc: perl: 21,221; xml: 423; makefile: 2
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;};   }