[PERL] System function e memorizzazione di comando in una variabile

[earp_]

Ho il seguente codice

@myDir = <*>;
foreach $myDir (@myDir) {
next if $myDir =~ /^\.\.?$/;
myVar = system "ls -l ".$myDir." | awk \'{print \$9}\'";
system "./miaFunc.pl myVar";
}

Non va.
Non riesco ad inserire "ls -l ".$myDir." | awk \'{print \$9}\'"; dentro ad una variabile.
Dove sta l'errore?