Yeah so based on that debug, %rec2 doesn't exist properly. It feels like this whole decoding stuff is far too complex for what it needs to be. What is the actual line of data its trying to extract from?
In your code above:
Try adding a dump of @data:
print Dumper( { data => \@data } );
See if that contains what you are expecting
Cheers
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
In your code above:
Code:
@data = &split_decode2($line);Try adding a dump of @data:
Code:
use Data::Dumper; print Dumper( { data => \@data } );
See if that contains what you are expecting
Cheers
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!