Steht bei dem zweiten etwas L <Device::ParallelPort::drv::win32> in der ersten Zeile?? Wo kommt das her? Das ist kein gültiger Perl-Befehl. Da muss eher ein use Device::SerialPort hin.

Dem new muss man wohl den Namen der Schnittstelle übergeben, also ein 'COM1' oder ein 'LPT1'...