#!/usr/bin/perl -w

use strict;
...
my @thescore = (); #declare and initialize the array

if ( $score > 12 ) && ( $score < 100 ){
    push @thescore, $_};
    ...
}