my %statusoption = (
  "Waiting Approval" => 0,
  "Denied"           => 1,
  "Approved"         => 2,
  "Ordered"          => 3,
  "Building"         => 4,
  "Built"            => 5,
  "Shipped"          => 6,
);
my $statusoption = $statusoption{$status};