Take me over?
NAME
Parse::FixedDelimiter - parse a string containing a fixed delimiter into component parts
SYNOPSIS
use Parse::FixedDelimiter;
$phone_number=803-781-4191;
Parse::FixedDelimiter::parse($phone_number,
\%moms_phone,
'-',
[ 'area_code', 'exchange', 'number' ]);
for (keys %moms_phone) {
print $_, " ", $moms_phone{$_}, $/;
}
# yields $moms_phone{area_code} == 803
# $moms_phone{exchange} == 781
# $moms_phone{number} == 4191
DESCRIPTION
The Parse::FixedDelimiter
module facilitates the process of breaking a string into its fixed-length components.
PARSING ROUTINES
There are two parsing routines: parse()
and quick_parse
.
- parse()
-
This function takes a string, a reference to a hash and a reference to a list of hashes and stores the results of fixed length parsing into the hash reference passed in.
- quick_parse()
-
This function takes the name of a pre-packaged datatype, a string, a reference to a hash and stores the results of fixed length parsing into the hash reference passed in.
DIAGNOSTIC ROUTINES
There is one diagnostic routine: print_parsed()
.
EXAMPLES
see SYNOPSIS
AUTHOR
Terrence Brannon <tbrannon@end70.com>
COPYRIGHT
Copyright (c) 1999 End70 Corporation
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
1 POD Error
The following errors were encountered while parsing the POD:
- Around line 118:
You forgot a '=back' before '=head1'