Sponsored Content
Top Forums Shell Programming and Scripting Help with perl script while reading a file Post 302423734 by ramakanth_burra on Saturday 22nd of May 2010 12:50:18 AM
Old 05-22-2010
More information on the issue

Hi, thanks for replying. Please find the below solution that I was trying to do.

First I read the directory in which my header files are there, and then read each file to search for the string "_mef"

Code:
#!/usr/bin/perl

use warnings;
my @files = glob("*.h");
$find = "_mef";
foreach my $file (@files)
	{
		FindString($file);
	}

sub FindString
	{
		my $filename = $_[0];
		open (FILE, "<$filename") or die $!;
		my @file = <FILE>;
	
		for(@file)
		{
			if($_=~/$find/)
			{
				foreach $line (@file)
				{
# This is where I am unable to proceed further depending on the below scenario

This will always be a string in the header file say "xyz" until which I have to browse through the file, and then write all the data types, their identifiers and values that come before that string. There could be few which come after the string "xyz" but I have to ignore them.

What I am want to achieve is to read line by line in the file until I hit the "xyz"
and then write the info into an excel file.

Kind Regards,
RB
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl Reading from File

is there a perl equivalent to sscanf? or something where I get the strings separated by spaces? (1 Reply)
Discussion started by: karyn1617
1 Replies

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 Replies)
Discussion started by: Harikrishna
3 Replies

3. Shell Programming and Scripting

perl - reading from a file conditionally

Hi, I am new to perl. I want to read from a file on the basis of some conditions.. I want to define parameters in a configuration file in such a manner like... etc.. in my perl script, theer is a variable like this.. then i want to read values from first if block from the file... (1 Reply)
Discussion started by: shellwell
1 Replies

4. Shell Programming and Scripting

SOLVED: reading config file in a perl script

Hi! I have a need to do this in Perl. script.pl -config file The script would be doing a wget/LWP on a URL which is defined in the config file. So when I run the script it should return either one of these conditions - 1) OK with exit status 0. Should also print "wget URL" 2)... (6 Replies)
Discussion started by: jacki
6 Replies

5. Shell Programming and Scripting

Help need in perl script reading from file

Need perl script, data file will be csv format. I have text file contains 2 colums. Filename Foldernumber aaaa 13455 bbbb 23465 cccc 26689 I have two location 1. files present and 2. folders present. I need to search for file and folder if folder... (3 Replies)
Discussion started by: hnkumar
3 Replies

6. Shell Programming and Scripting

Perl Script Not Reading Input Files Correctly

This is one of the strangest things that's happening to me. I'm writing a new Perl script that is trying to read a file. The file is originally in .mof format, but I also saved the contents into a .txt file. As a simple test, I wrote this: #!/user/bin/perl -w use strict; ... (3 Replies)
Discussion started by: kooshi
3 Replies

7. UNIX for Dummies Questions & Answers

reading a file in Perl

If a form's action is the following Perl script how do I make it print the entire contents of the file on the screen? if(param()) { my $uploadedFile = param('file');#in the html page 'file' is the value of the name attribute of the input my $fh = upload($uploadedFile); ... (1 Reply)
Discussion started by: zerohour
1 Replies

8. Shell Programming and Scripting

Perl Script for reading table format data from file.

Hi, i need a perl script which reads the file, content is given below. and output in new file. TARGET DRIVE IO1 IO2 IO3 IO4 IO5 ------------ --------- --------- --------- --------- --------- 0a.1.8 266 236 ... (3 Replies)
Discussion started by: asak
3 Replies

9. Shell Programming and Scripting

Need help with perl script with a while loop reading file

Good morning, I appreciate any assistance that I can get from the monks out there. I am able to get this to work for me so that I can do a hostname lookup if I only specify one hostname in the script. What I want to do is have a file with hostnames and do lookups for each name in the file. Here is... (1 Reply)
Discussion started by: brianjb
1 Replies

10. Shell Programming and Scripting

Error while reading variable from a file in perl script

I have a file abc.ini and declared many variables in that file, one of the variable(DBname) value I am trying to read in my perl script but getting error. File abc.ini content # database name DBname =UATBOX my $ex_stat; my $cmd_output; $ex_stat = "\Qawk '/^DBname/{print... (2 Replies)
Discussion started by: Devesh5683
2 Replies
GLOB(3) 								 1								   GLOB(3)

glob - Find pathnames matching a pattern

SYNOPSIS
array glob (string $pattern, [int $flags]) DESCRIPTION
The glob(3) function searches for all the pathnames matching $pattern according to the rules used by the libc glob() function, which is similar to the rules used by common shells. PARAMETERS
o $pattern - The pattern. No tilde expansion or parameter substitution is done. o $flags - Valid flags: o GLOB_MARK - Adds a slash to each directory returned o GLOB_NOSORT - Return files as they appear in the directory (no sorting). When this flag is not used, the pathnames are sorted alphabetically o GLOB_NOCHECK - Return the search pattern if no files matching it were found o GLOB_NOESCAPE - Backslashes do not quote metacharacters o GLOB_BRACE - Expands {a,b,c} to match 'a', 'b', or 'c' o GLOB_ONLYDIR - Return only directory entries which match the pattern o GLOB_ERR - Stop on read errors (like unreadable directories), by default errors are ignored. RETURN VALUES
Returns an array containing the matched files/directories, an empty array if no file matched or FALSE on error. Note On some systems it is impossible to distinguish between empty match and an error. CHANGELOG
+--------+--------------------+ |Version | | | | | | | Description | | | | +--------+--------------------+ | 5.1.0 | | | | | | | | | | GLOB_ERR was added | | | | +--------+--------------------+ EXAMPLES
Example #1 Convenient way how glob(3) can replace opendir(3) and friends. <?php foreach (glob("*.txt") as $filename) { echo "$filename size " . filesize($filename) . " "; } ?> The above example will output something similar to: funclist.txt size 44686 funcsummary.txt size 267625 quickref.txt size 137820 NOTES
Note This function will not work on remote files as the file to be examined must be accessible via the server's filesystem. Note This function isn't available on some systems (e.g. old Sun OS). Note The GLOB_BRACE flag is not available on some non GNU systems, like Solaris. SEE ALSO
opendir(3), readdir(3), closedir(3), fnmatch(3). PHP Documentation Group GLOB(3)
All times are GMT -4. The time now is 11:45 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy