Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Searching and printing the only pattern using awk,sed or perl
Top Forums Shell Programming and Scripting Searching and printing the only pattern using awk,sed or perl Post 302886245 by Akshay Hegde on Thursday 30th of January 2014 08:59:50 AM
Old 01-30-2014
Try :

Code:
$ lparstat -i | awk '/Entitled Capacity/ && NF==4{$1=$1;print}'

Tested like this
Code:
$ cat file
Entitled Capacity                          : 1.00
Entitled Capacity of Pool                  : 1900

$ awk '/Entitled Capacity/ && NF==4{$1=$1;print}' file
Entitled Capacity : 1.00

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Split a file based on pattern in awk, grep, sed or perl

Hi All, Can someone please help me write a script for the following requirement in awk, grep, sed or perl. Buuuu xxx bbb Kmmmm rrr ssss uuuu Kwwww zzzz ccc Roooowwww eeee Bxxxx jjjj dddd Kuuuu eeeee nnnn Rpppp cccc vvvv cccc Rhhhhhhyyyy tttt Lhhhh rrrrrssssss Bffff mmmm iiiii Ktttt... (5 Replies)
Discussion started by: kumarn
5 Replies

2. UNIX for Dummies Questions & Answers

Perl searching and printing multiple target in the same line

Hello, I'm trying to create a program in perl called myfind.pl; To use the program: (at the command line)$ program.pl keyword filename note: the keyword is any word or regular expression and it should display the result just like when you 'cat' the file name but with the keyword in... (2 Replies)
Discussion started by: Horizon666
2 Replies

3. Shell Programming and Scripting

Sed - Pattern Searching

Hi, Please take a look at the below eg. I would like to search for abc() pattern first and then search for (xyz) in the next line. If I can find the pattern, then I should delete the 3 lines. I can only find the pattern and delete but I am unable to find two patterns and delete. Any... (8 Replies)
Discussion started by: sreedevi
8 Replies

4. 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 (7 Replies)
Discussion started by: edge_diners
7 Replies

5. Shell Programming and Scripting

Perl, searching multiple files and printing returned line to new file

I am trying to find a way to utilise the full potential of my cpu cores and memory on my windows machine. Now, I am quite familiar with grep, however, running a Unix based OS is not an option right now. Unfortunately, the 32 bit grep for windows that I am running, I cannot run multiple... (1 Reply)
Discussion started by: Moloch
1 Replies

6. Shell Programming and Scripting

Need an awk / sed / or perl one-liner to remove last 4 characters with non-unique pattern.

Hi, I'm writing a ksh script and trying to use an awk / sed / or perl one-liner to remove the last 4 characters of a line in a file if it begins with a period. Here is the contents of the file... the column in which I want to remove the last 4 characters is the last column. ($6 in awk). I've... (10 Replies)
Discussion started by: right_coaster
10 Replies

7. 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 (9 Replies)
Discussion started by: dani777
9 Replies

8. Shell Programming and Scripting

Searching and printing only required pattern

Hi all, i am trying to count the number of logical processors from the below output: # print_manifest | grep "logical processors" 8 cores, 16 logical processors per socket 2 logical processors (2 per socket) i just want to have below output : 16 2 also... (11 Replies)
Discussion started by: omkar.jadhav
11 Replies

9. Shell Programming and Scripting

Replacing lines matching a multi-line pattern (sed/perl/awk)

Dear Unix Forums, I am hoping you can help me with a pattern matching problem. What am I trying to do? I want to replace multiple lines of a text file (that match a multi-line pattern) with a single line of text. These patterns can span several lines and do not always have the same number of... (10 Replies)
Discussion started by: thefang
10 Replies

10. Shell Programming and Scripting

Sed: printing lines AFTER pattern matching EXCLUDING the line containing the pattern

'Hi I'm using the following code to extract the lines(and redirect them to a txt file) after the pattern match. But the output is inclusive of the line with pattern match. Which option is to be used to exclude the line containing the pattern? sed -n '/Conn.*User/,$p' > consumers.txt (11 Replies)
Discussion started by: essem
11 Replies

LEARN ABOUT DEBIAN

imager::qrcode

Imager::QRCode(3pm)					User Contributed Perl Documentation				       Imager::QRCode(3pm)

NAME

       Imager::QRCode - Generate QR Code with Imager using libqrencode

SYNOPSIS

	   use Imager::QRCode;

	   my $qrcode = Imager::QRCode->new(
	       size	     => 2,
	       margin	     => 2,
	       version	     => 1,
	       level	     => 'M',
	       casesensitive => 1,
	       lightcolor    => Imager::Color->new(255, 255, 255),
	       darkcolor     => Imager::Color->new(0, 0, 0),
	   );
	   my $img = $qrcode->plot("blah blah");
	   $img->write(file => "qrcode.gif");

	   # or instance method
	   use Imager::QRCode qw(plot_qrcode);

	   my $img = plot_qrcode("blah blah", \%params);
	   $img->write(file => "qrcode.gif");

DESCRIPTION

       This module allows you to generate QR Code with Imager. This module use libqrencode '2.0.0' and above.

METHODS

       new
	       $qrcode = Imager::QRCode->new(%params);

	   The "new()" constructor method instantiates a new Imager::QRCode object. "new()" accepts the following parameters.

	   o   "size" - Horizontal and vertical size of module(dot). Default is 4.

	   o   "margin" - Margin size of QR Code. Default is 3.

	   o   "level" - Error collectin level. Valid values are 'M', 'L', 'Q' or 'H'. Default is 'L'.

	   o   "version" - Version of the symbol. If specify '0', this module chooses the minimum version for the input data. Default is '0'.

	   o   "mode" - Encoding mode. Valid values are 'numerical', 'alpha-numerical', '8-bit' or 'kanji'. Default is '8-bit'.

	       If not give "casesensitive" then should be given "mode". If 'kanji' is given, characters will be encoded as Shift-JIS characters.
	       If '8-bit' is given, all of non-alpha-numerical characters will be encoded as is. If you want to embed UTF-8 string, choose
	       '8-bit'.

	   o   "casesensitive" - If your application is case-sensitive using 8-bit characters, set to '1'. Default is '0'.

       plot($text)
	       $img = $qrcode->plot("blah blah");

	   Create a new QR Code image. This method returns Imager object ploted QR Code with the given text.

INSTANT METHODS

       plot_qrcode($text, \%params)
	   Instant method. $text is input text. %params is same parameter as "new()".

SEE ALSO

       "Imager", "http://www.qrcode.com/", "http://megaui.net/fukuchi/works/qrencode/index.en.html"

AUTHOR

       Yoshiki KURIHARA  "<kurihara __at__ cpan.org>"

THANKS

       Tokuhiro Matsuno

LICENCE AND COPYRIGHT

       Copyright (c) 2011, Yoshiki KURIHARA "<kurihara __at__ cpan.org>".

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

perl v5.14.2							    2012-12-16						       Imager::QRCode(3pm)
All times are GMT -4. The time now is 08:53 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy