PERL und awk

[MIB]

my @array = ypcat -k passwd |awk '{print $1}' ;

In dem Array befindet sich dann der output von (ypcat -k passwd) als ob der awk Teil ueberhaupt nicht existieren wuerde.

Kann mir jemand weiterhelfen ?

my @array = ypcat -k passwd |awk '{print \$1}' ;