On Wed, Mar 07, 2001 at 03:47:11PM +0100, Federico Di Gregorio wrote:
> 
> quindi bisogna andare sul cattivo... :)
> 
> awk 'BEGIN {RS="\n\n+"} ; /Version: .*helix.*/ { print $2 }' 
> /var/lib/dpkg/status
> 

ancora piu' cattivo, io avevo partorito questo:
perl -e 'open (I,"< /var/lib/dpkg/status"); while(<I>)
{($f,$v)=split /: /; if ($f eq "Package") { $package=$v }; print
$package if (($f eq "Version") and ($v =~ /helix/)); }'

Scambio di cattiverie :))

-- 
        - Zack -

Stefano Zacchiroli <[EMAIL PROTECTED]> ICQ# 33538863
Home Page: http://www.students.cs.unibo.it/~zacchiro
Undergraduate Student of Computer Science at University of Bologna, Italy
SysAdm of verdicchio.students.cs.unibo.it (130.136.3.134)
        "Information wants to be Open"


Rispondere a