As described in perldoc perldata :
... , -. . $days{'Feb'} $days{Feb}, . - . , , $version{2.0}++ $version{2}++, $version{'2.0'}++.
, - [A-Za-z0-9_], ( ) . , , :
use strict; use warnings;
use Data::Dumper;
my $x = 1;
my %hash = (
bare_string => 'hi there',
"not a bare string" => 'yup',
);
$hash{'$x'} = 'foo';
$hash{"$x"} = 'bar';
print Dumper(\%hash);
:
$VAR1 = {
'bare_string' => 'hi there',
'not a bare string' => 'yup',
'$x' => 'foo'
'1' => 'bar',
};