perl add key value pair to hash
#!/usr/bin/perl
#-----------------------------------------
# perl-hash-add.pl
# created by alvin alexander, devdaily.com
#-----------------------------------------
# create a perl hash
$prices{'pizza'} = 12.00;
$prices{'coke'} = 1.25;
$prices{'sandwich'} = 3.00;
# traverse the perl hash and print
# the key/value pairs
print "\nforeach output:\n";
foreach $key (keys %prices)
{
# do whatever you want with $key and $value here ...
$value = $prices{$key};
print " $key costs $value\n";
}
Are there any code examples left?
New code examples in category Perl
-
Perl 2022-01-31 07:16:22 perl format decimal 2 places not rounding
-
Perl 2022-01-30 19:35:07 perl id number validation south africa
-
Perl 2021-11-22 02:55:21 unique in perl
-
Perl 2021-11-13 16:55:08 perl lowercase
-
Perl 2021-11-11 04:30:19 perl write to file
-
Perl 2021-11-06 23:53:11 perl for loop
-
Perl 2021-11-05 18:26:13 perl sprintf YYYYMMDD sample