Сега остава да опишеш как създаваш нова инстанция

Подозирам, без доказателства, че set_table не получава $self като първи аргумент и $table като втори, а получава само $table като първи и единствен аргумент.

Можеш да изведеш стойностите на $self и $table във функцията set_table за да докажеш или отхвърлиш хипотезата.

RTFM!
--sdg