view release on metacpan or  search on metacpan

lib/Acme/PM/Barcelona/12x5_ca.pod  view on Meta::CPAN

    'tags'       => 'barcelona.pm',
    'is_public'  => 1,
    'is_friend'  => 1,
    'is_family'  => 1,
  );

=head2 Codis QR

=head3 Què són?

Els codis QR s'utilitzen per a codificar informació que pugui
ser llegida i utilitzada de forma ràpida des d'un dispositiu
lector.

Es tracta d'un invent japonès per tal que es pugui llegir
informació ràpidament des dels mòbils i
es pugui utilitzar d'immediat sense haver d'escriure res, per exemple
posant-ho en un anunci d'un diari o en una pancarta al carrer, etc.

=head3 Tipus de dades

S'assemblen als codis de barres però permeten emmagatzemar
tot tipus de dades:

=over 4

=item * numèriques

=item * alfanumèriques

=item * binàries

=item * kanji o kana

=back

=head3 Correcció d'errors

Una altra característica interessant dels codis QR és
que permeten fer correcció d'errors si el dibuix no es veu
del tot bé. N'hi ha de 4 nivells:

=over 4

=item * L recupera el 7%

=item * M recupera el 15%

=item * Q recupera el 25%

=item * H recupera el 30%

=back

=head3 GD::Barcode::QRcode

Generar un codi QR és molt senzill:

  use GD::Barcode::QRcode;

  binmode(STDOUT);
  print GD::Barcode::QRcode->new('http://perl.cat/')
                           ->plot
                           ->png;

=head3 Image::DecodeQR

Llegir un codi QR és encara més senzill:

  use Image::DecodeQR;

  $url = Image::DecodeQR::decode('perl.cat_qr.png');

=head2 X11::GUITest

=head3 Automatització d'interfícies gràfiques a X11

C<X11::GUITest> permet interactuar amb interfícies gràfiques
d'usuari basades en X11.

Algunes funcions interessants d'aquest mòdul:

=over 4

=item * C<StartApp> executa l'aplicació i retorna el control al
programa Perl.

=item * C<SendKeys> simula l'ús del teclat tot enviant les
pulsacions a la finestra que estigui en primer pla.
Les teclas modificadores es codifiquen amb caràcters específics:

=over 4

=item ^ => CTRL

=item % => ALT

=item + => MAJ

=item ~ => ENTER

=back

=item * C<WaitWindowViewable> espera a que la finestra de l'aplicació
estigui visible.

=back

=head3 Obrir algunes pàgines web amb el Firefox

  use X11::GUITest qw/
      StartApp
      WaitWindowViewable
      SendKeys
  /;

  StartApp('firefox http://barcelona.pm.org/');

  ($main_win) = WaitWindowViewable(
      'Barcelona Perl Mongers',
      undef,