Usually I try to pop the elements as I use them, so there's no additional cleanup needed in the end, or if it's at the end of the script, there's not really a need to manually delete it. Here's the script I was writing, where I was needing it.

  while (<infp>)
  {
    if (/^%!PS-Adobe/) #Start of Page Marker
    {
      if ($found_match)
      {
        @linelist = reverse @linelist;
        while ($line = pop(@linelist))
        {
          print $line;
        }
        $found_match = 0;
      }
      else
      {
        #Empty List
        undef @linelist;
      }
    }
    elsif(/^%%Title/)
    {
      for $z(@figlist)
      {
        if (/$z[A-Za-z]*\.eps/i)
        {
          $found_match = 1;
        }
      }
    }
    push @linelist, $_;
  }
[download]

Basically it parse a PostScript file, ripping out only the pages that match a certain search criteria (@figlist)

I guess a different design would have prevented the need to delete the list. I never really used the "strict" keyword, but I'm glad you brought it up, it does help enforce good coding.

Thanks for your response!