...
push @$obj, qw ( 12 19 35 37 48 98 25 );
...