i wanted to thank all people for their ideas
I got all functions i need to work, and after all data is recovered i can store the machines form '88 in a dark corner.
pack solved some issues, and suprisingly some functions expected their data in a defined time pules manner like:
data 5msbreak option 5msbreak ...
the timepulse could vary from 5ms to 10ms.
The last function i got to work in analyzing what the printer recived from Basic and in what it got converted,
so i transmited the exact converted data from perl to the device like \x1D\x38\x4C\x06\x00\x00\x00\x30\x45\x4C\x31\x01\x01 one of the smaller ones ;)