Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: awk help to make my work faster
Top Forums Shell Programming and Scripting awk help to make my work faster Post 302271359 by matrixmadhan on Thursday 25th of December 2008 02:55:23 AM
Old 12-25-2008
Here is an example on how to do that in perl, please tweak according to the needs

Code:
#! /opt/third-party/bin/perl

# map line number and contents in the file

my %fileHash = ();
my $lfh;
open($lfh, "<", "file_1") or die "Unable to open file : file_1 <$!>\n";

while ( <$lfh> ) {
  chomp;
  $fileHash{$.} = $_;
}

close($lfh);

# open file that contains line numbers for which data needs to be extracted from the other file 

open($lfh, "<", "file_2") or die "Unable to open file : file_2 <$!>\n";

while( <$lfh> ) {
  chomp;
  print "Here is the information " , $fileHash{$_} , "\n";
}

close($lfh);

exit(0)

 

10 More Discussions You Might Find Interesting

1. Solaris

looking for different debugger for Solaris or to make sunstudio faster

im using the sunstudio but it is very slow , is there ant other GUI debugger for sun Solaris or at list some ways to make it faster ? im using to debug throw telnet connection connected to remote server thanks (0 Replies)
Discussion started by: umen
0 Replies

2. Shell Programming and Scripting

Can anyone make this script run faster?

One of our servers runs Solaris 8 and does not have "ls -lh" as a valid command. I wrote the following script to make the ls output easier to read and emulate "ls -lh" functionality. The script works, but it is slow when executed on a directory that contains a large number of files. Can anyone make... (10 Replies)
Discussion started by: shew01
10 Replies

3. Red Hat

Re:How to make the linux pc faster

Hi, Can any one help me out in solving the problem i have a linux database server it is tooo slow that i am unable to open even the terminial is there any solution to get rid of this problem.How to make this server faster. Thanks & Regards Venky (0 Replies)
Discussion started by: venky_vemuri
0 Replies

4. Shell Programming and Scripting

How to make copy work faster

I am trying to copy a folder which contains a list of C executables. It takes 2 mins for completion,where as the entire script takes only 3 more minutes for other process. Is there a way to copy the folder faster so that the performance of the script will improve? (2 Replies)
Discussion started by: prasperl
2 Replies

5. Shell Programming and Scripting

Running rename command on large files and make it faster

Hi All, I have some 80,000 files in a directory which I need to rename. Below is the command which I am currently running and it seems, it is taking fore ever to run this command. This command seems too slow. Is there any way to speed up the command. I have have GNU Parallel installed on my... (6 Replies)
Discussion started by: shoaibjameel123
6 Replies

6. Shell Programming and Scripting

Make script faster

Hi all, In bash scripting, I use to read files: cat $file | while read line; do ... doneHowever, it's a very slow way to read file line by line. E.g. In a file that has 3 columns, and less than 400 rows, like this: I run next script: cat $line | while read line; do ## Reads each... (10 Replies)
Discussion started by: AlbertGM
10 Replies

7. Shell Programming and Scripting

awk changes to make it faster

I have script like below, who is picking number from one file and and searching in another file, and printing output. Bu is is very slow to be run on huge file.can we modify it with awk #! /bin/ksh while read line1 do echo "$line1" a=`echo $line1` if then echo "$num" cat file1|nawk... (6 Replies)
Discussion started by: mirwasim
6 Replies

8. Shell Programming and Scripting

How to make awk command faster?

I have the below command which is referring a large file and it is taking 3 hours to run. Can something be done to make this command faster. awk -F ',' '{OFS=","}{ if ($13 == "9999") print $1,$2,$3,$4,$5,$6,$7,$8,$9,$10,$11,$12 }' ${NLAP_TEMP}/hist1.out|sort -T ${NLAP_TEMP} |uniq>... (13 Replies)
Discussion started by: Peu Mukherjee
13 Replies

9. Shell Programming and Scripting

How to make awk command faster for large amount of data?

I have nginx web server logs with all requests that were made and I'm filtering them by date and time. Each line has the following structure: 127.0.0.1 - xyz.com GET 123.ts HTTP/1.1 (200) 0.000 s 3182 CoreMedia/1.0.0.15F79 (iPhone; U; CPU OS 11_4 like Mac OS X; pt_br) These text files are... (21 Replies)
Discussion started by: brenoasrm
21 Replies

10. Shell Programming and Scripting

How to make faster loop in multiple directories?

Hello, I am under Ubuntu 18.04 Bionic. I have one shell script run.sh (which is out of my topic) to run files under multiple directories and one file to control all processes running under those directories (control.sh). I set a cronjob task to check each of them with two minutes of intervals.... (3 Replies)
Discussion started by: baris35
3 Replies

LEARN ABOUT SUSE

pfunc

PFUNC(1)						User Contributed Perl Documentation						  PFUNC(1)

NAME

       pfunc - grep for perl functions

SYNOPSIS

	   pfunc subroutine FILES...

DESCRIPTION

       pfunc searches the named FILES for all calls to the given subroutine.  It will report back the file and line number each call is found on
       along with what sort of call it is

	   function	       foo()
	   class method        Class->foo()
	   object method       $obj->foo()

EXAMPLE

	   $ pfunc isa /usr/share/perl/5.6.1/*.pm
	   Called as function in /usr/share/perl/5.6.1/CGI.pm at line 316
	   Called as function in /usr/share/perl/5.6.1/CGI.pm at line 327
	   Called as function in /usr/share/perl/5.6.1/CGI.pm at line 397
	   Called as function in /usr/share/perl/5.6.1/CGI.pm at line 494
	   Called as function in /usr/share/perl/5.6.1/CGI.pm at line 495
	   Called as object method in /usr/share/perl/5.6.1/CPAN.pm at line 4957
	   Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 191
	   Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 218
	   Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 248
	   Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 251
	   Called as function in /usr/share/perl/5.6.1/Dumpvalue.pm at line 254
	   Called as object method in /usr/share/perl/5.6.1/Shell.pm at line 28
	   Called as object method in /usr/share/perl/5.6.1/base.pm at line 12

NOTES

       Its not fast, but its accurate.

AUTHOR

       Michael G Schwern <schwern@pobox.com>

SEE ALSO

       Module::Info

perl v5.12.1							    2002-12-05								  PFUNC(1)
All times are GMT -4. The time now is 06:25 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy