Sponsored Content
Full Discussion: Awk script into Perl
Top Forums Shell Programming and Scripting Awk script into Perl Post 302409792 by pludi on Friday 2nd of April 2010 01:35:45 PM
Old 04-02-2010
Am I getting you right, if the string you're searching for is in line 43, you want to print line 42, right? If so (untested):
Code:
awk 'BEGIN{prev=""} /search_string/{print prev} {prev=$0}' myfile.txt
perl -ne 'print $prev if /search_string/; $prev=$_;' myfile.txt

For more complex stuff, take a look at a2p, part of any Perl distribution.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

embeding awk script in perl program

Collegues I have an AWK script like the following. { if ($2 ~ /JJ/ && $4 ~ /IN/) { print $2, $3, $4, $5 } } How can I embed it in a perl program. Jaganadh.G (5 Replies)
Discussion started by: jaganadh
5 Replies

2. Shell Programming and Scripting

perl as awk replacement in a script.

Hey all, Im trying to write a script on windows, which Im not too familiar with. Im generally a bash scripting guy but am using perl for this case. My question is... I have this exact output: 2 Dir(s) 6,380,429,312 bytes free and I just need to get the number out... (4 Replies)
Discussion started by: trey85stang
4 Replies

3. Shell Programming and Scripting

awk script in perl

Hi Linux users, I have to convert a shell script in a perl script! The command takes two files (two tables) and compares them to find the same values in 4 columns ($2" "$3" "$8" "$9) and prints out only the common lines. This is the command: cat first_file.txt | while read i; do cat... (2 Replies)
Discussion started by: m_elena
2 Replies

4. Shell Programming and Scripting

Executing AWK in a perl script using 'system'...

I have a simple perl script that looks similar to this: #!/usr/bin/perl/ # Have a lot of PERL code in the front of this script. #Would now like to execute a system command using AWK system (qq(cd /location && awk '/full/ {print $1;exit}' /myfile)); The system command in my perl script... (4 Replies)
Discussion started by: SysAdm2
4 Replies

5. Shell Programming and Scripting

Shell script (not Perl) to parse xml with awk

Hi, I have to make an script according to these: - I have couples of files like: xxxxxxxxxxxxx.csv xxxxxxxxxxxxx_desc.xml - every xml file has diferent fields, but keeps this format: ........ <defaultName>2011-02-25T16:43:43.582Z</defaultName> ........... (2 Replies)
Discussion started by: Pluff
2 Replies

6. Shell Programming and Scripting

usage of AWK command under perl script

i have two files as shown below t1.txt: argument1 argu2 argu37 t2.txt: 22 33 44 i want o/p as argument1 22 argu2 33 argu37 44 i am trying to merge two file under perl script using following system("paste t1.txt t2.txt | awk... (3 Replies)
Discussion started by: roopa
3 Replies

7. Shell Programming and Scripting

Help with convert awk script into perl

Input file (a list of input file name with *.txt extension): campus.com_icmp_ping_alive.txt data_local_cd_httpd.txt data_local_cd.txt new_local_cd_mysql.txt new_local_cd_nagios_content.txt Desired output file: data local_cd_httpd data local_cd new local_cd_mysql new ... (9 Replies)
Discussion started by: perl_beginner
9 Replies

8. Shell Programming and Scripting

Multi platform script perl or awk

Hi gurus, I am trying to match records in following format: (-,username,domain1.co.uk)\ (-,username,domain2.co.uk) either awk or perl must be used. I am using cygwin. I wrote following code which works and matches both above entries: awk 'BEGIN {musr="(-,username,+.co.uk)"} {if... (8 Replies)
Discussion started by: wakatana
8 Replies

9. Shell Programming and Scripting

awk or perl script for preposition splitter

Hello, I am writing a Natural Language Parser and one of the tools I need is to separate prepositional phrase markers which begin with a Preposition. I have a long list of such markers (sample given below)and am looking for a script in awk or perl which will allow me to access a look-up file... (2 Replies)
Discussion started by: gimley
2 Replies

10. Shell Programming and Scripting

Script in Perl or awk to remove multiple hyphens

Dear all, I have a database of compound words. I want to retain only strings with a single hyphen and identify those strings which have more than one hyphen. I am giving an example below test-test test-test-test test-test-test-test-test good-for-nothing The regex/script should remove all... (11 Replies)
Discussion started by: gimley
11 Replies
prev(1) 						      General Commands Manual							   prev(1)

NAME
prev - show the previous message (only available within the message handling system, mh) SYNOPSIS
prev [+folder] [-[no]header] [-help] [-showproc program] [-noshowproc] [options to showproc] OPTIONS
Displays a one-line header before the message. The header consists of the name of the folder and the message number. This is the default behavior. It can be suppressed with the -noheader option. Prints a list of the valid options to this command. Specifies an alternative program to list messages. The default is to use the program defined by the showproc: entry in the file. As with show, you can give options to the showproc program at the command line. These are passed directly to showproc by prev. The defaults for this command are: +folder defaults to the current folder -header DESCRIPTION
The prev command displays the previous message in the current folder. The previous message is the one before the current message in the folder. The message that is shown becomes the current message. You can specify a folder other than the current folder by using the +folder argument. If you specify a folder, that becomes the current folder. RESTRICTIONS
The prev command is really a link to the show program. As a result, if you make a link to prev and that link is not called prev, your link will act like show instead. To avoid this, add a profile-entry for the link to your MH profile and add the argument prev to the entry. PROFILE COMPONENTS
Path: To determine your Mail directory showproc: Program to show the message EXAMPLES
The command in the following example displays the previous message in the folder +copylog: $ prev +copylog FILES
The user profile. SEE ALSO
show(1), next(1) prev(1)
All times are GMT -4. The time now is 12:42 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy