Warnung bei Spreadsheet::ParseExcel: was tun? - #49296 (Allgemeines zu Perl)

esskar

2004-08-14 14:47

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

Code: (dl )

sub TextFmt($$;$) {
    my($oThis, $sTxt, $sCode) =@_;
    return $sTxt if((! defined($sCode)) || ($sCode eq '_native_'));
    return pack('C*', unpack('n*', $sTxt));
}

ist dann diese Zeile

Code: (dl )

return pack('C*', unpack('n*', $sTxt));

man müsste sich überlegen, was man pack('C*' übergeben muss, damit es diese warning wirft!