Reading the file line by line in Perl Post: 302589373

9 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

perl - file reading - last line not displayed

Hi, Here is something that am trying with perl #! /opt/third-party/bin/perl open(fh, "s") || die "unable to open the file <small>"; @ch = (); $i = 0; while( $content = <fh> ) { if( $i <= 5 ) { push(@ch, $content); $i++; } else { $i = 1; foreach(@ch) {

2. Shell Programming and Scripting

Reading each line of a file in perl script

HI I need to read each line (test.txt) and store it in a array (@test) How to do it in perl. Suppose i have a file test.txt. I have to read each line of the test.txt file and store it in a array @test. How to do it in perl. Regards Harikrishna

3. Shell Programming and Scripting

Reading a file line by line and processing for each line

Hi, I am a beginner in shell scripting. I have written the following script, which is supposed to process the while loop for each line in the sid_home.txt file. But I'm getting the 'end of file' unexpected for the last line. The file sid_home.txt gets generated as expected, but the script...

4. Shell Programming and Scripting

[Solved] Problem in reading a file line by line till it reaches a white line

So, I want to read line-by-line a text file with unknown number of files.... So: a=1 b=1 while ; do b=`sed -n '$ap' test` a=`expr $a + 1` $here do something with b etc done the problem is that sed does not seem to recognise the $a, even when trying sed -n ' $a p' So, I cannot read...

5. UNIX for Dummies Questions & Answers

Parsing file, reading each line to variable, evaluating date/time stamp of each line

So, the beginning of my script will cat & grep a file with the output directed to a new file. The data I have in this file needs to be parsed, read and evaluated. Basically, I need to identify the latest date/time stamp and then calculate whether or not it is within 15 minutes of the current...

6. Shell Programming and Scripting

Reading text file, comparing a value in a line, and placing only part of the line in a variable?

I need some help. I would like to read in a text file. Take a variable such as ROW-D-01, compare it to what's in one line in the text file such as PROD/VM/ROW-D-01 and only input PROD/VM into a variable without the /ROW-D-01. Is this possible? any help is appreciated.

7. Shell Programming and Scripting

Comparison of fields then increment a counter reading line by line in a file

Hi, i have a scenario were i should compare a few fields from each line then increment a variable based on that. Example file 989878|8999|Y|0|Y|N|V 989878|8999|Y|0|N|N|V 989878|8999|Y|2344|Y|N|V i have 3 conditions to check and increment a variable on every line condition 1 if ( $3...

8. Shell Programming and Scripting

Reading line by line from live log file using while loop and considering only those lines start from

Hi, I want to read a live log file line by line and considering those line which start from time stamp; Below code I am using, which read line but throws an exception when comparing line that does not contain error code tail -F /logs/COMMON-ERROR.log | while read myline; do...

9. UNIX for Beginners Questions & Answers

Reading a file line by line and print required lines based on pattern

Hi All, i want to write a shell script read below file line by line and want to exclude the lines which contains empty value for MOUNTPOINT field. i am using centos 7 Operating system. want to read below file. # cat /tmp/d5 NAME="/dev/sda" TYPE="disk" SIZE="60G" OWNER="root"...

LEARN ABOUT DEBIAN

prima::tie

Prima::Tie(3)						User Contributed Perl Documentation					     Prima::Tie(3)

NAME

       Prima::Tie - tie widget properties to scalars or arrays.

DESCRIPTION

       Prima::Tie contains two abstract classes, "Prima::Tie::Array" and "Prima::Tie::Scalar", which tie an array or a scalar to a widget's
       arbitrary array or scalar property.  Also, it contains classes "Prima::Tie::items", "Prima::Tie::text", and "Prima::Tie::value", which tie
       a variable to a widget's items, text, and value property respectively.

SYNOPSIS

	       use Prima::Tie;

	       tie @items, 'Prima::Tie::items', $widget;

	       tie @some_property, 'Prima::Tie::Array', $widget, 'some_property';

	       tie $text, 'Prima::Tie::text', $widget;

	       tie $some_property, 'Prima::Tie::Scalar', $widget, 'some_property';

USAGE

       These classes provide immediate access to a widget's array and scalar property, in particular to popular properties as items and text. It
       is considerably simpler to say

	       splice(@items,3,1,'new item');

       than to say

	       my @i = @{$widget->items};
	       splice(@i,3,1,'new item');
	       $widget->items(@i);

       You can work directly with the text or items rather than at a remove.  Furthermore, if the only reason you keep an object around after
       creation is to access its text or items, you no no longer need to do so:

	       tie @some_array, 'Prima::Tie::items', Prima::ListBox->create(@args);

       As opposed to:

	       my $widget = Prima::ListBox->create(@args);
	       tie @some_array, 'Prima::Tie::items', $widget;

       "Prima::Tie::items" requires "::items" property to be available on the widget.  Also, it takes advantage of additional "get_items",
       "add_items", and the like if available.

   Prima::Tie::items
       The class is applicable to "Prima::ListViewer", "Prima::ListBox", "Prima::Header", and their descendants, and in limited fashion to
       "Prima::OutlineViewer" and its descendants "Prima::StringOutline" and "Prima::Outline".

   Prima::Tie::text
       The class is applicable to any widget.

   Prima::Tie::value
       The class is applicable to "Prima::GroupBox", "Prima::ColorDialog", "Prima::SpinEdit", "Prima::Gauge", "Prima::Slider",
       "Prima::CircularSlider", and "Prima::ScrollBar".

COPYRIGHT

       Copyright 2004 Teo Sankaro

       You may redistribute and/or modify this module under the same terms as Perl itself.  (Although a credit would be nice.)

AUTHORS

       Teo Sankaro, <teo_sankaro@hotmail.com>.	Dmitry Karasik, <dmitry@karasik.eu.org>.

perl v5.14.2							    2009-02-24							     Prima::Tie(3)