Opened by namenlose at 2013-11-13 11:59
User since
2005-01-17
14755 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14755 Artikel
Admin1
binmode muss vor der Ausgabe der Daten in die Datei; also nach dem open aber vor dem print geschehen!
use GD::Barcode::Code39;
use GD::Barcode::Code39;
Code (perl): (dl
)
1 2 3 4 5
my $filename = "code39.png"; open(my $png, ">", $filename) || die "Cannnot open $filename: $!"; binmode($png); print $png GD::Barcode::Code39->new('*CODE39IMG*')->plot->png; close($png) || die "Cannnot close $filename: $!";