Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Supriya
#perl 5.26.1 $productid{'p001'}=1000; $productid{'p002'}=500; print "p001 \a"; print $productid{'p001'}; print "\n p002 \a"; print $productid{'p002'}; if ($productid{'p001'}>$productid{'p002'}) { print "\n maxprice="; print $productid{'p001'}; } else { print "maxprice="; print $productid{'p002'}; };
run
|
edit
|
history
|
help
0
1st code
121JHgZzG4QMkDQwLJCifHAAsZAwvpqACY
bitSum 059-1
Riyali-101738
Tony Gunk
each_hash_function
perl
Hash
Hash Refrence for memory optimization
Attractive Numbers