package CommonObject;
my @common_array;

package MyObject;

@ISA = qw( CommonObject );
sub new{
 my $class=shift;
 my $self = {};
 bless $self, $class;
$self->@common_array=qw(1 2);#This line throws syntax error
return $self;
}