open FHAND,"unzip -l $filename|";

while(<FHAND>)
{
  # PROCESS $_
}