Oneliner-question

Posted by sid_com on Stack Overflow See other posts from Stack Overflow or by sid_com
Published on 2010-04-28T07:51:26Z Indexed on 2010/04/28 7:53 UTC
Read the original article Hit count: 321

Filed under:

perl

|

oneliner

I proudly present a solution to the problem:

perl -00 -F"\n" -anE '$_ = ( split / /, $F[1] )[0]; if ( !/error/ ) { $sum += $_; $c++ } } { say $sum / $c' file

The problem: the first field of the second line of each paragraph if it is not error.
How could I do this without the paragraph-mode?

perl -anE 'say $F[0] if not /error/ and the second /\S+/ after /^$/' file

© Stack Overflow or respective owner

Related posts about perl

Munin on Centos 6 - missing perl MODULE_COMPAT_5.8.8

as seen on Server Fault - Search for 'Server Fault'
I'm trying to install Munin on a new VPS through yum install munin but I keep getting an error about a missing perl module: Requires: perl(:MODULE_COMPAT_5.8.8). This is the perl version currently installed: v5.10.1. I've searched all around and still haven't found a solution for this. Here's the… >>> More
Pain removing a perl rootkit

as seen on Server Fault - Search for 'Server Fault'
So, we host a geoservice webserver thing at the office. Someone apparently broke into this box (probably via ftp or ssh), and put some kind of irc-managed rootkit thing. Now I'm trying to clean the whole thing up, I found the process pid who tries to connect via irc, but i can't figure out who's… >>> More
How To Avoid a Perl script calling an Another Perl Script

as seen on Stack Overflow - Search for 'Stack Overflow'
Hello, i am calling a perl script client.pl from a main script to capture the output of client.pl in @output. is there anyway to avoid the use of these two files so i can use the output of client.pl in main.pl itself here is my code.... main.pl ======= my @output = readpipe("client.pl"); client… >>> More
Perl :how to sort dates in perl

as seen on Stack Overflow - Search for 'Stack Overflow'
Hi, How can I sort the dates in perl. my @dates = ( "02/11/2009" , "12/20/2001" , "11/21/2010" ) ; I have above dates in my array . How can I sort those dates... ? My date format is dd/mm/YYYY. >>> More
please suggest a perl book exclusively for perl programs

as seen on Stack Overflow - Search for 'Stack Overflow'
I want tha name of a perl book for only PERL PROGRAMS. The reason behind is I want to improve my programming skill in perl >>> More

Related posts about oneliner

Oneliner-question

as seen on Stack Overflow - Search for 'Stack Overflow'
I proudly present a solution to the problem: perl -00 -F"\n" -anE '$_ = ( split / /, $F[1] )[0]; if ( !/error/ ) { $sum += $_; $c++ } } { say $sum / $c' file The problem: the first field of the second line of each paragraph if it is not error. How could I do this without the paragraph-mode? perl… >>> More
Recursively rename files - oneliner preferably

as seen on Ask Ubuntu - Search for 'Ask Ubuntu'
I found this answer how do i... but it simply doesn't work - it did not rename any file for unknown to me reason Before I started to search around I thought that it should be easy task even for novice penguin, but it doesn't seem so for me. For example, I simply can't tell ls to list all *.txt in… >>> More
Unix 'tr' or Perl-Oneliner for replacing 0123 into ACTG

as seen on Stack Overflow - Search for 'Stack Overflow'
I have a file with such list: 100 101 102 103 What I want to do is to replace every 0 into A, 1 into C, 2 into G, 3 into T. Hence we hope to get CAA CAC CAG CAT >>> More
Oneliner to count the number of tabs in each line of a file

as seen on Stack Overflow - Search for 'Stack Overflow'
I have a file that is tab delimited. I would like a powershell script that counts the number of tabs in each line. I came up with this: ${C:\tabfile.txt} |% {$_} | Select-String \t | Measure-Object | fl count it yields 3, Which is the number of lines in the file. any pointers to what I'm doing… >>> More
Quickly read pgm header with comments in C

as seen on Stack Overflow - Search for 'Stack Overflow'
Quickly write PGM header is fprintf(f, "P5 %d %d 255\n", width, height); Quickly read PGM header is fscanf(f, "P5%d%d%*d\n"); // now can read the data from f, but it fails when the header contains comments (like if saved by GIMP). How to read PGM header in more compatible way (without a lot of code… >>> More