#!/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__
$ perl temp.pl $VAR1 = '((( n ormal))) '; $VAR1 = "(((\0n\0ormal)))\n"; $ perl temp.pl |od -tacx1 0000000 $ V A R 1 sp = sp ' ( ( ( nul n nul +o $ V A R 1 = ' ( ( ( \0 n \0 +o 24 56 41 52 31 20 3d 20 27 28 28 28 00 6e 00 6f 0000020 r m a l ) ) ) cr nl ' ; cr nl $ V +A r m a l ) ) ) \r \n ' ; \r \n $ V +A 72 6d 61 6c 29 29 29 0d 0a 27 3b 0d 0a 24 56 41 0000040 R 1 sp = sp " ( ( ( \ 0 n \ 0 o +r R 1 = " ( ( ( \ 0 n \ 0 o +r 52 31 20 3d 20 22 28 28 28 5c 30 6e 5c 30 6f 72 0000060 m a l ) ) ) \ n " ; cr nl m a l ) ) ) \ n " ; \r \n 6d 61 6c 29 29 29 5c 6e 22 3b 0d 0a 0000074 $ perl temp.pl |hexdump 00000000: 24 56 41 52 31 20 3D 20 - 27 28 28 28 00 6E 00 6F |$VAR1 = ' +((( n o| 00000010: 72 6D 61 6C 29 29 29 0D - 0A 27 3B 0D 0A 24 56 41 |rmal))) +'; $VA| 00000020: 52 31 20 3D 20 22 28 28 - 28 5C 30 6E 5C 30 6F 72 |R1 = "((( +\0n\0or| 00000030: 6D 61 6C 29 29 29 5C 6E - 22 3B 0D 0A |mal)))\n" +; | 0000003c;
In reply to Re: Strange read file behaviour
by Anonymous Monk
in thread Strange read file behaviour
by saintex
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |