while(<FILE>) {
   push @stock,$_;
}

# Would be better as...
@stock = <FILE>;