awk command with PERL Post: 302239654

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

awk/sed/perl command to delete specific pattern and content above it...

Hi, Below is my input file: Data: 1 Length: 20 Got result. Data: 2 Length: 30 No result. Data: 3 Length: 20

2. Shell Programming and Scripting

awk command in script gives error while same awk command at prompt runs fine: Why?

Hello all, Here is what my bash script does: sums number columns, saves the tot in new column, outputs if tot >= threshold val: > cat getnon0file.sh #!/bin/bash this="getnon0file.sh" USAGE=$this" InFile="xyz.38" Min="0.05" # awk '{sum=0; for(n=2; n<=NF; n++){sum+=$n};...

3. Shell Programming and Scripting

Command to remove duplicate lines with perl,sed,awk

Input: hello hello hello hello monkey donkey hello hello drink dance drink Output should be: hello hello monkey donkey drink dance

4. Programming

Executing a awk command inside perl script --

Hello experts I want to execute a awk command, which reads from txt files and sums the numbers from the first column for those listed only inside a <init> block -- The awk command is like awk '/<\/?init>/{x = !x}x{a++}x && a > 2{sum+=$1}END{printf"%E" "\n", sum} So, I want to execute...

5. 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...

6. Shell Programming and Scripting

using awk in perl with split command

Hi, I have an array with following data. First field shows the owner and second is unique name. Now i have to pic the latest value with respect to the date in case of duplicate. like "def" is from two owners "rahul/vineet", now i want the latest from the two and the owner name also for all the...

7. Programming

Errors in Perl when using awk command

Hi Guys, Hope everyone is fine :) I have this code below: #!/usr/bin/perl $num_of_files=`ls | grep -v remover | wc -l`; $remover=`ls -lrt | grep -v total | grep -v remover | head -1 | awk '{print $8}' | rm \`xargs\``; if ($num_of_files>3) { system ($remover); } When I...

8. Shell Programming and Scripting

Convert awk command to Perl

Hi all; I have a Perl script that uses this awk command wrapped in a "system" call; it works exactly as I want it; however I want to keep this a Perl script and have very few if any "system" command...so the question; can someone help me code this in Perl please ... i have tried an now I am...

9. Shell Programming and Scripting

Sed/awk/perl command to replace pattern in multiple lines

Hi I know sed and awk has options to give range of line numbers, but I need to replace pattern in specific lines Something like sed -e '1s,14s,26s/pattern/new pattern/' file name Can somebody help me in this.... I am fine with see/awk/perl Thank you in advance

10. Shell Programming and Scripting

Using awk command in Perl

Hi All, I got some requirement of using Awk in perl subroutine One of the variable in my perl script holds below type of data. I want to split this value as quotes seperated and get the second last field i.e., 3206000 from above. I used below code in my perl sub-routine,...

LEARN ABOUT MOJAVE

ppi::token::quote

PPI::Token::Quote(3)					User Contributed Perl Documentation				      PPI::Token::Quote(3)

NAME

       PPI::Token::Quote - String quote abstract base class

INHERITANCE

	 PPI::Token::Quote
	 isa PPI::Token
	     isa PPI::Element

DESCRIPTION

       The "PPI::Token::Quote" class is never instantiated, and simply provides a common abstract base class for the four quote classes.  In PPI,
       a "quote" is limited to only the quote-like things that themselves directly represent a string. (although this includes double quotes with
       interpolated elements inside them).

       The subclasses of "PPI::Token::Quote" are:

       '' - PPI::Token::Quote::Single
       "q{}" - PPI::Token::Quote::Literal
       "" - PPI::Token::Quote::Double
       "qq{}" - PPI::Token::Quote::Interpolate

       The names are hopefully obvious enough not to have to explain what each class is here. See their respective pages for more details.

       Please note that although the here-doc does represent a literal string, it is such a nasty piece of work that in PPI it is given the honor
       of its own token class (PPI::Token::HereDoc).

METHODS

   string
       The "string" method is provided by all four ::Quote classes. It won't get you the actual literal Perl value, but it will strip off the
       wrapping of the quotes.

	 # The following all return foo from the ->string method
	 'foo'
	 "foo"
	 q{foo}
	 qq <foo>

   literal
       The "literal" method is provided by ::Quote:Literal and ::Quote::Single.  This returns the value of the string as Perl sees it: without the
       quote marks and with "\" and "'" resolved to "" and "'".

       The "literal" method is not implemented by ::Quote::Double or ::Quote::Interpolate yet.

SUPPORT

       See the support section in the main module.

AUTHOR

       Adam Kennedy <adamk@cpan.org>

COPYRIGHT

       Copyright 2001 - 2011 Adam Kennedy.

       This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

       The full text of the license can be found in the LICENSE file included with this module.

perl v5.18.2							    2011-02-25						      PPI::Token::Quote(3)

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

awk/sed/perl command to delete specific pattern and content above it...

Discussion started by: edge_diners

2. Shell Programming and Scripting

awk command in script gives error while same awk command at prompt runs fine: Why?

Discussion started by: catalys

3. Shell Programming and Scripting

Command to remove duplicate lines with perl,sed,awk

Discussion started by: cola

4. Programming

Executing a awk command inside perl script --

Discussion started by: Alkass