#!/usr/bin/perl --
use strict;
use warnings;
use Data::Dumper;
print Dumper( "(((\00n\00ormal)))\n" );
{
    local $Data::Dumper::Useqq=1;
    print Dumper(  "(((\00n\00ormal)))\n" );
}
__END__