test na cislo

[Jiri Polcar]

Potrebuju prevest uhel z notace

                deg:min:sec  (23:23:322.432)

na dekadickou

                deg (23.3895)

Od uzivatele prevezmu `deg:min:sec', splitnu to

        ( $deg, $min, $sec ) = split /:/, $input;

a chci se podivat, jestli maji jednotlive casti ($deg, $min a $sec)
smysl, napriklad, jestli

            0 <= $min < 60

Pokud v $min neni cislo, tak predchozi podminka zkonci s warningem. Tomu
se snazim vyhnout. Je to srozumintelne?


On Thu, Oct 24, 2002 at 01:24:28PM +0200, Honza Pazdziora wrote:
> On Thu, Oct 24, 2002 at 01:21:49PM +0200, Jiri Polcar wrote:
> > No, nezduraznil jsem, ze vim jak oba testy o kterych jsem mluvil,
> > udelat. Jde me jen o to, ze jsou dost komplikovany. Mozna existuje
> > nejaka jina moznost -- jednodussi.
> > 
> > Mimochodem, cislo muze vypadat i komplikovaneji: +.234e-12
> 
> Vzdycky, kdyz podobny dotaz padne, tak se nakonec prijde na to, ze
> tazatel vlastne nevi, proc by to mel chtit. Ale zaujalo ho, ze v Perlu
> u te hodnoty neni nejaka externi nalepka "retezec/cislo, nehodici se
> skrtnete".
> 
> Na co to potrebujete? Abyste ziskal numerickou hodnotu? Abyste to byl
> schopen vypsat kanonicky? Nebo?
> 
> -- 
> ------------------------------------------------------------------------
>  Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
>       ... all of these signs saying sorry but we're closed ...
> ------------------------------------------------------------------------

-- 
JP