> # create test data matrix
> @data_line = @data_matrix = ();
> @data_line = ("1","26","0","0","2","","0","0","Long","","0","Thomas","Tom");
> #@data_line = ("1","26","0","0","2","","0","0","Long","","0","","Tom");
> push @data_matrix, [ @data_line ];
> @data_line = ("2","27","0","0","2","","0","0","Green","","0","Margaret","Midge");
> #@data_line = ("2","27","0","0","2","","0","0","Green","","0","","Midge");
> push @data_matrix, [ @data_line ];
> @data_line = ("3","9","0","0","2","","0","0","Shaughnessy","","0","Joyce","");
> push @data_matrix, [ @data_line ];
> @data_line = ("4","27","0","0","2","","0","0","Raccoon","","0","Rockford","");
> push @data_matrix, [ @data_line ];
> @data_line = ("5","27","0","0","2","","0","0","Green","","0","Betty","");
> push @data_matrix, [ @data_line ];
push @data_matrix, [ 1,26,0,0,2,'',0,0,'Long' ,'',0,'Thonmas'
,'Tom' ],
[ 2,27,0,0,2,'',0,0,'Green'
,'',0,'Margaret','Midge' ],
[ 3, 9,0,0,2,'',0,0,'Shaughnessy','',0,'Joyce'
,'' ],
[ 4,27,0,0,2,'',0,0,'Raccoon'
,'',0,'Rockford','' ],
[ 5,27,0,0,2,'',0,0,'Green' ,'',0,'Betty'
,'' ];
> $lastname_sort = "08";
> $firstname_sort = "11";
$lastname_sort = 8;
$firstname_sort = 11;
Will fix the runtime. It looks like Perl was trying to treat 08 as an
octal in which case an error code of "Illegal octal digit" should has
been raised. I don't know if this is a bug and/or error as most people
don't access elements in an array by octals.
- Ron
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
