Re: [Arsperl-users] Parse arx file
Brought to you by:
jeffmurphy
|
From: Brad O'H. <br...@uf...> - 2007-11-13 21:35:23
|
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
|