Select Code to Download

use warnings;
use strict;
...
$hashone{FIVE}
########################################
PRINT

# Scalar Variables
$scalarone = "one";
...
  THREE => 'three',
  FOUR => 'four',
  FIVE => 'five');