...
while(<PW>) {
  ($name,$pass,$uid,$gid,$quota,$comment,$gcos,$dir,$shell) = split(/:/);
   print blah...
}