Chicago, IL to Saint Looey, MO - Mann Act!
Saint Looey, MO to Joplin, MO
Joplin, MO to OKC, OK - Mann Act!
OKC, OK to Amarillo, TX - Mann Act!
Amarillo, TX to Gallup, TX
Gallup, TX to Flagstaff, AZ - Mann Act!
Flagstaff, AZ to Winona, AZ
Winona, AZ to Kingman, AZ
Kingman, AZ to Barstow, CA - Mann Act!
Barstow, CA to San Bernandino, CA
San Bernandino, CA to LA, CA

##### Alternative #####
do {
  my $a = {
    "Amarillo"       => { city => "Amarillo", state => "TX" },
    "Barstow"        => { city => "Barstow", state => "CA" },
    "Chicago"        => { city => "Chicago", state => "IL" },
    "Flagstaff"      => { city => "Flagstaff", state => "AZ" },
    "Gallup"         => { city => "Gallup", state => "TX" },
    "Joplin"         => { city => "Joplin", state => "MO" },
    "Kingman"        => { city => "Kingman", state => "AZ" },
    "LA"             => { city => "LA", state => "CA" },
    "OKC"            => { city => "OKC", state => "OK" },
    "Saint Looey"    => { city => "Saint Looey", state => "MO" },
    "San Bernandino" => { city => "San Bernandino", state => "CA" },
    "Winona"         => { city => "Winona", state => "AZ" },
  };
  (
    $a,
    [
      $a->{"Chicago"},
      $a->{"Saint Looey"},
      $a->{"Joplin"},
      $a->{"OKC"},
      $a->{"Amarillo"},
      $a->{"Gallup"},
      $a->{"Flagstaff"},
      $a->{"Winona"},
      $a->{"Kingman"},
      $a->{"Barstow"},
      $a->{"San Bernandino"},
      $a->{"LA"},
    ],
  );
}
Chicago, IL to Saint Looey, MO - Mann Act!
Saint Looey, MO to Joplin, MO
Joplin, MO to OKC, OK - Mann Act!
OKC, OK to Amarillo, TX - Mann Act!
Amarillo, TX to Gallup, TX
Gallup, TX to Flagstaff, AZ - Mann Act!
Flagstaff, AZ to Winona, AZ
Winona, AZ to Kingman, AZ
Kingman, AZ to Barstow, CA - Mann Act!
Barstow, CA to San Bernandino, CA
San Bernandino, CA to LA, CA