Du definierst "$data" innerhalb der if/else Abzweinung und versuchst einen Scalar ($data) mit einem Array zu füllen "(...)" und das dann außerhalb des Definitionsbereiches als Array in einen Scalar zu schreiben. das Funktioniert vorne und hinten nicht.

Hattest du keine Fehlermeldungen??

Entweder du nutzut immr @array, oder du nutzt ein anonymes Array $data=[...].
Dann musst du die Zuweisung zu "$self->{data}" innerhalb der Blöcke (if/else) machen entweder "$self->{data}=$data" oder "$self->{data}=\@data".
Alles andere kann nicht funktionieren.