my( $name, $lat, $long ) = qw(Name Latitude Longitude);