system("wc -l $file");

##</code><code>##

system("cd $dir; wc -l $file");