Using phrases like it doesn't work gives us very little information. If it worked, you would probably not be here, so to say it is not working just is not helpful.
However, I (and I suspect others) would not be likely to wade through your code. Asking specific questions is is the way to get the best help here and in most other forums.
If I needed to work with fixed-length data, I would use perl's read function instead of the <> syntax:
Code:
read FILEHANDLE,SCALAR,LENGTH,OFFSET
read FILEHANDLE,SCALAR,LENGTH
Attempts to read LENGTH characters of data into variable SCALAR
from the specified FILEHANDLE. Returns the number of
characters actually read, 0 at end of file, or undef if there
was an error (in the latter case $! is also set).
-- excerpt from perldoc -f read
On the other hand, if awk works for you, great.
When I am tackling a problem, I usually create a small data set for testing. I would also make sure it was small enough to post in a forum, because posting sample data and expected output is is a good way to attract answers. In your case, I would not post the long records, but I would make up a dataset with lrecl=50 or so, with perhaps 10 records or whatever is a representative sample.
HI,
I want to split a text after certain fix character count in text.
For eg: My file is containing text like:
AURBJR,AURCID,AURVID,CHANDV,DAMNEW,DHMMAN,GANGAN,GARKHE,GOREGA,JEJKHA,JEJSHI,JINTUR,JMKKUS,JUNAWA,KALKAL,KHOJEW,KUNJIR,MAGARP,MAHAD,
in this i want to print text after each... (5 Replies)
Hi all.
I am trying to add font to use however sdtfontadm fail so many times regardless of using GUI or CDE. It look likes a very regular error.
It release "Segamentation Fault (core dump) ./sdtfontadm "
The serious of this problem is its hard to find a way without reinstalling the... (3 Replies)
Hi
I have a big verilog file with multiple modules. Each module begin with the code word 'module <module-name>(ports,...)'
and end with the
'endmodule' keyword.
Could you please suggest the best way to split each of these modules into multiple files?
Thank you for the help.
Example of... (7 Replies)
Hi,
I have file: data.log.1
### s1
main.build.3495
main.build.199
main.build.3408
###s2
main.build.3495
main.build.3408
main.build.199
I want to read this file and store in two arrays in Perl.
I have following command, which is working fine on command prompt.
perl -n -e... (1 Reply)
Hi all
I have written Perl script to swap the strings in the second a third column from a text file.
My input file format is :
the|empty|the|det lake|empty|lake|conj_and was|empty|was|auxpass drained|empty|drained|conj_and birds|empty|bird|s|nn
The expected output file format is... (11 Replies)
I had a text file(comma seperated values) which contains as below
196237,ram,25-May-06,ram.kiran@xyz.com,204183,Pavan,4-Jun-07,Pavan.Desai@xyz.com,237107,ram Chandra,15-Mar-10,ram.krishna@xyz.com ... (3 Replies)
Hi all,
I have a csv file that appears as follows:
,2013/03/26,2012/12/26,4,1,"2017/09/26,5.75%","2017/09/26,1,2018/09/26,1,2019/09/26,1,2020/09/26,1,2021/09/26,1",,,2012/12/26,now when i use the split function like this:
my @f = split/,/; the split function will split the data that is... (2 Replies)
I do have an xml sheet as below where I need the perl script to filter only the hyperlink tags.
<cols><col min="1" max="1" width="30.5703125" customWidth="1"/><col min="2" max="2" width="7.140625" bestFit="1" customWidth="1"/>
<col min="3" max="3" width="32.28515625" bestFit="1"... (3 Replies)
Hi,
I would like to split single fine into two array ..
Example: file.txt
--------------Installation --------------------
#GXTOOL=GxTools-20130501.tar.gz
GCSS=GExpLinux-BE-3700.0.12.37.tar.gz
TOP=TOPLinux-BE-3700.0.6.21.tar.gz
GHDER=GHDERLinux-BE-3700.0.6.20.tar.gz... (2 Replies)
Discussion started by: Mani_apr08
2 Replies
LEARN ABOUT OSX
uri::split
URI::Split(3) User Contributed Perl Documentation URI::Split(3)NAME
URI::Split - Parse and compose URI strings
SYNOPSIS
use URI::Split qw(uri_split uri_join);
($scheme, $auth, $path, $query, $frag) = uri_split($uri);
$uri = uri_join($scheme, $auth, $path, $query, $frag);
DESCRIPTION
Provides functions to parse and compose URI strings. The following functions are provided:
($scheme, $auth, $path, $query, $frag) = uri_split($uri)
Breaks up a URI string into its component parts. An "undef" value is returned for those parts that are not present. The $path part is
always present (but can be the empty string) and is thus never returned as "undef".
No sensible value is returned if this function is called in a scalar context.
$uri = uri_join($scheme, $auth, $path, $query, $frag)
Puts together a URI string from its parts. Missing parts are signaled by passing "undef" for the corresponding argument.
Minimal escaping is applied to parts that contain reserved chars that would confuse a parser. For instance, any occurrence of '?' or
'#' in $path is always escaped, as it would otherwise be parsed back as a query or fragment.
SEE ALSO
URI, URI::Escape
COPYRIGHT
Copyright 2003, Gisle Aas
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.16.2 2012-02-11 URI::Split(3)