$action = <>;
if ($action eq "go"){
#GO;}
elsif($action eq "pickup"){
#Pick it up buddy}

etc, etc....