[2008/10/14 10:57:18] [55] DEBUG Austin::API::vendor_api - Initialising the API Galileo
[2008/10/14 10:57:18] [41] DEBUG Austin::Suppliers::Common::Location::init - Setting Up Generic Locations
[2008/10/14 11:15:22] [147] DEBUG Austin::Controller::default - $VAR1 = {
          'Errors' => [
                        {
                          'ID' => 'noRates',
                          'Error' => 'No Rates for given dates/times',
                          'object' => '/var/website/modules/Austin/CB/Search.pm',
                          'Location' => undef,
                          'line' => 371
                        },
                      ]
        };
[2008/10/14 10:57:18] [245] DEBUG Austin::XV::Trip::set_time_zone - Checking timezone with agent UK
[2008/10/14 10:57:18] [247] DEBUG Austin::XV::Trip::set_time_zone - Setting timezone to Europe/London
[2008/10/14 11:15:22]
[2008/10/14 11:15:22] [147] DEBUG Austin::Controller::default - $VAR1 = {
          'Errors' => [
                        {
                          'ID' => 'noRates',
                          'Error' => 'No Rates for given dates/times',
                          'object' => '/var/website/modules/Austin/CB/Search.pm',
                          'Location' => undef,
                          'line' => 371
                        },
                      ]
        };
[2008/10/14 11:15:22]

##</code><code>##

while($data =~ /'Errors' => \[([^\]]+)/sgm) {
	my $match = qq|\$ref = [$1];|;
	my $ref;
	$ref = eval {$match};
	print Dumper($ref);

}