Re: [Arsperl-users] Parse arx file
Brought to you by:
jeffmurphy
|
From: Brad O'H. <br...@uf...> - 2008-01-19 04:27:52
|
Thilo,
I've come upon a record the causes the following code to seg fault. Do you have any interest
in taking a look?
Thanks,
Brad
On Tuesday 13 November 2007 4:35 pm, Brad O'Hara wrote:
> Thanks! Certainly something I can work with!
>
> Brad
>
> On Tuesday 13 November 2007 3:01 pm, Thilo Stapff wrote:
> > Here's a subroutine that splits a line in ARX format to an array of
> > values. It works for the basic data types such as character, integer etc.
> > More complicated data like attachments, diary and currency would of
> > course need some further processing.
> >
> >
> > use Text::Balanced qw( extract_delimited );
> >
> >
> > sub splitArxLine {
> > my( $line ) = @_;
> > my @ret;
> > my $val;
> >
> > print "--------------------\n";
> > while( length($line) ){
> > if( substr($line,0,1) eq '"' ){
> > ( $val, $line ) = extract_delimited( $line, '"' );
> > last if defined($line) && !defined($val);
> > $val =~ s/^"//;
> > $val =~ s/"$//;
> >
> > $val =~ s/\\\\/\\/g;
> > $val =~ s/\\r//g;
> > $val =~ s/\\n/\n/g;
> > $val =~ s/\\"/"/g;
> >
> > print "<$val>\n";
> >
> > }else{
> > $line =~ s/(\S+)//;
> > $val = $1;
> > }
> > push @ret, $val;
> > $line =~ s/\s*//;
> > }
> >
> > return @ret;
> > }
> >
> >
> >
> > Regards,
> > Thilo
> >
> >
> >
> > Brad O'Hara wrote:
> > > Hi all,
> > >
> > > Anyone written a routine to parse a .arx file?
> > >
> > > Thanks,
> > > Brad
> >
> >
> > -------------------------------------------------------------------------
> > This SF.net email is sponsored by: Splunk Inc.
> > Still grepping through log files to find problems? Stop.
> > Now Search log events and configuration files using AJAX and a browser.
> > Download your FREE copy of Splunk now >> http://get.splunk.com/
> > _______________________________________________
> > Arsperl-users mailing list
> > Ars...@ar...
> > https://lists.sourceforge.net/lists/listinfo/arsperl-users
> >
> >
>
--
Brad O'Hara E-mail: br...@uf...
IT Expert Voice: (352)392-2061
Computing and Networking Services Suncom: 622-2061
University of Florida Fax: (352)392-9440
|