There's more than one way to do things PerlMonks

### Re^5: Perl oddities

by hardburn (Abbot)
 on Mar 01, 2005 at 16:18 UTC ( #435506=note: print w/replies, xml ) Need Help??

in reply to Re^4: Perl oddities

Quoting is not an identity function in Perl.

"There is no shame in being self-taught, only in not trying to learn in the first place." -- Atrus, Myst: The Book of D'ni.

Replies are listed 'Best First'.
Re^6: Perl oddities
by Anonymous Monk on Mar 01, 2005 at 16:49 UTC
Quoting is not an identity function in Perl.

It's not, but if you're going to use them as hash keys, they get quoted anyway:

```perl -MDevel::Peek -e '\$a = 1; Dump (\$a); %a = map +{\$_}, \$a; Dump (\$a
+)'
SV = IV(0x8192edc) at 0x8191dc4
REFCNT = 1
FLAGS = (IOK,pIOK)
IV = 1
SV = PVIV(0x8184888) at 0x8191dc4
REFCNT = 1
FLAGS = (IOK,POK,pIOK,pPOK)
IV = 1
PV = 0x818b5b8 "1"\0
CUR = 1
LEN = 2

```perl -MDevel::Peek -e '\$a = 1; Dump (\$a); %a = map {"\$_",}, \$a; Dump (
+\$a)'
SV = IV(0x8192edc) at 0x8191dc4
REFCNT = 1
FLAGS = (IOK,pIOK)
IV = 1
SV = PVIV(0x8184888) at 0x8191dc4
REFCNT = 1
FLAGS = (IOK,POK,pIOK,pPOK)
IV = 1
PV = 0x818b5b8 "1"\0
CUR = 1
LEN = 2
No difference.

Create A New User
Node Status?
node history
Node Type: note [id://435506]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (3)
As of 2018-05-26 20:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
Voting Booth?
World peace can best be achieved by:

Results (194 votes). Check out past polls.

Notices?