[Arsperl-users] handling ARWARN 1200

[Paizo <pai...@gm...>]

Hi listeners,

I'm making a perl script to check the presence of some kind of tickets.
Usually there are no tickets of this kind causing a ARWARN 1200.
I would like to handle this warning but i miss something....


$arwarn =3D "";
(%entries =3D ars_GetListEntry($ctrl, $ARSschema, $qual, 0, 0)) || ($arwarn=
 =3D
$ars_errstr);

print "$arwarn\n"; # $arwarn is empty!

if ($arwarn=3D~ m/\ARWARN 1200/i)
{
    ars_Logoff($ctrl) || exit 0;
    exit 0;
}

what's wrong with that code?
Seems also that $arwarn is empty because it print nothing at all.


thank you for your time.


--=20
--------------------
A me cugin na volta xe nd=E0 dal geataro e el ga domand=E0 na coppetta trig=
usto
co i gusti seegheta, sarexe e schie co na fettina de poenta.
El geataro pena sentio che=E0 goduriosa scelta, el se ga messo subito el
pigiama de banane e el ghe ga messo in testa a corona de poegge medie e lo
ga fatto diventare Re dei Gelati Biricchini.
-----------------------
Confezione trigusto seegheta/sarexe/chie co pratico contenitore par e fete
de poenta, stile estat=E8 o quea dea ciocoeata
Altri gusti poe essere bigadini/kiwi/lasonil co socoi de vacca da tociare o
erbagatta/straciatella/calsina co coe de sorxe da tociare
------------
Rileggendo a firma diria che se poe puntare al mercato dei ghiaccioli col e=
l
gusto crema al diserbo e parafl=F9 ricoperta da una soffice crosta de pus c=
o
al posto del bacheto un termometro anale pratico pa misurarse a freve dopo
aver magn=E0 el geato (chi xe che no lo fa al giorno d'oggi?!?!). Garantite
scorese bitonali e solfeggi anali.