use Switch;

switch ($CGI->param('action')) {
    case 'delayed_inv' { $to_do->delayedinv() }
    case 'del_inv'     { $to_do->del_inv()    }
    case 'payed'       { $to_do->payed()      }
    ...
    else               { $to_do->defscreen()  }
}