> > Is there a more efficient way other than *substr*, I looked a *pack* and > > *unpack* . it did not make any sense to me. Unpack is what I would use. Perldoc unpack. $item = substr($the_line,0,10); $ldesc = substr($the_line,11,40); $page = substr($the_line,52,6); $d = substr($the_line,59,8); my ( $time, $ldesc, $page, $d ) = unpack ( "A10 A40 A6 A8", $the_line ); untested. HTH, PK
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
