http://qs1969.pair.com?node_id=800382

djbryson has asked for the wisdom of the Perl Monks concerning the following question:

Will barcode::Code128 do 128a, yes or no? Thanks I need to create a barcode 128a graphic. I read about the barcode 128 module, but I'm confused as to whether it can do it. It says I can specify CodeA, but some scanners may not be able to read it. Is CodeA what I want for barcode 128a? Or is CodeA something different. I need it to work with scanners also. If barcode 128 can't do 128a, what module can? Thanks

Replies are listed 'Best First'.
Re: barcode 128a
by nedals (Deacon) on Oct 09, 2009 at 22:54 UTC
    use Barcode::Code128;

    You will also need the GD.pm module installed

[reply]
[d/l]
      Will barcode::Code128 do 128a, yes or no? Thanks
[reply]
Re: barcode 128a
by GrandFather (Saint) on Oct 10, 2009 at 00:52 UTC

    Code_128#Subtypes may help. Code 128 is a commonly used general purpose code. Code 128a is, in effect, a subset of Code 128 where the A character set is accessed using a 'shift' character.

    True laziness is hard work
[reply]
Re: barcode 128a
by biohisham (Priest) on Oct 10, 2009 at 06:52 UTC
    There's this module Imager::QRCode which generates two dimensional QR codes, I am not aware if it has code 128 capabilities for one dimensional barcodes but it seems easy and so intuitive to use, you may need to install Getopt::Std, check this overview and the CPAN.

    For general scanning of barcodes there's an open-source library in java called ZXing which has support for the code 128 among others.

    Excellence is an Endeavor of Persistence. Chance Favors a Prepared Mind.
[reply]
[d/l]
[select]
Re: barcode 128a
by hesco (Deacon) on Oct 09, 2009 at 22:22 UTC
    I know nothing of barcodes, but I bet an examination of perldoc for modules listed at: http://search.cpan.org/search?query=barcode&mode=all would likely be helpful.

    Good luck.

    -- Hugh

    if( $lal && $lol ) { $life++; }
    if( $insurance->rationing() ) { $people->die(); }
[reply]
Re: barcode 128a
by dkasak (Initiate) on Oct 11, 2009 at 11:38 UTC
    My PDF::ReportWriter can print type 128 barcodes. It's available on cpan or at: http://entropy.homelinux.org/axis/ ( click 'reports' ).
[reply]

Back to Seekers of Perl Wisdom