[Omaha.pm] Stack traces rule!

["Jay Hannah" <jhannah@omnihotels.com>]

('T' in the debugger)

How else could you ever trace goo like this?

Neato,

j


2005-04-06 18:02:07,846 (SlaveBot.pm:118)> cro_resno:1004411618|airline_ff_id:00300560016|partner_id:UA|class:Model::omares::crs::Rewards
2005-04-06 18:02:08,385 (SlaveBot.pm:126)>    Successfully loaded fg_id:14040489
2005-04-06 18:02:08,388 (SlaveBot.pm:191)>    status_program:000|status_omni:900
Model::omares::Prod::Common::load(/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/Prod/Common.pm:720):
720:          $self->set_error(code=>2920,text=>"No data in $table for filter $filter.");
  DB<5> T
$ = Model::omares::Prod::Common::load(ref(Model::omares::Prod::user), 'filter', 'user_id=\'SB-RECEIVE_FILE()\'') called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/crs/Permissions.pm' line 146
$ = Model::omares::crs::Permissions::load_user(ref(Model::omares::crs::Permissions), 'user_id', 'SB-RECEIVE_FILE()') called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/crs/Permissions.pm' line 120
$ = Model::omares::crs::Permissions::load(ref(Model::omares::crs::Permissions), 'user_id', 'SB-RECEIVE_FILE()') called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/Prod/Common.pm' line 220
$ = Model::omares::Prod::Common::_calculate_res_source(ref(Model::omares::Prod::fg_rewards)) called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/Prod/Common.pm' line 169
. = Model::omares::Prod::Common::set_who_and_when(ref(Model::omares::Prod::fg_rewards)) called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/Prod/Common.pm' line 383
$ = Model::omares::Prod::Common::update(ref(Model::omares::Prod::fg_rewards), 'filter', 'fg_id = \'14040489\' and cro_resno = \'1004411618\'') called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/crs/Rewards.pm' line 541
. = Model::omares::crs::Rewards::_fg_rewards_commit(ref(Model::omares::crs::Rewards)) called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/omares/crs/Rewards.pm' line 504
. = Model::omares::crs::Rewards::change_omni_status(ref(Model::omares::crs::Rewards), 900) called from file `/usr/lib/perl5/site_perl/Omni/MVC/Model/Rewards/SlaveBot.pm' line 233
. = Model::Rewards::SlaveBot::receive_file(ref(Model::Rewards::SlaveBot), 'local_filename', 'OMNIERROR_20050218_3', 'partner_id', 'UA') called from file `receive.pl' line 19