my @array = eval $number;

##</code><code>##

      for (my $i=$1;$i<=$2;$i++){
        push @arraydigit, $i;
      }

##</code><code>##

     push @array, $1..$2;