Constant :: atoom Unieke symbolen
Download nu

Constant :: atoom Rangschikking & Samenvatting

Constant :: atoom Tags

Perl-module perl symbolen uniek unieke symbolen

Constant :: atoom Beschrijving

unieke symbolen Unlike constanten constante verklaard worden Atomen niet gekoppeld aan een bepaalde schaalwaarde. In plaats daarvan Atomen een eigen onafhankelijke identiteit en slechts positieve vergelijken (via de 'eq' test) met andere gelijke atomen. Alle andere bewerkingen op Atomen ongedefinieerd zijn, met inbegrip van het gieten van een nummer en het gieten van een string.Atoms worden gebruikt in plaats van constanten in situaties waar een unieke waarde is nodig om een idee of het programma staat vertegenwoordigen, maar waar die waarde niet van nature geassocieerd met een scalaire waarde, en moet niet worden verward met een. Atomen gelijk aan C opsommingen in dit opzicht, behalve dat atomen niet een ordinale value.Below is een voorbeeld waar een Atom problemen zou oplossen: # gebruik constant :: Atom dolinghe; Gebruik constant 'error' => 999.999; sub bar {mijn ($ arg) = @_; #Always terug $ arg voor demonstratiedoeleinden (niet fout). return 1? $ Arg: error; } Mijn $ foo = bar (999999); afdrukken "Foo: $ foo \ n"; print $ foo eq fout? "Foo fout geretourneerd." : "Foo terug $ foo."; Output: Foo terug error.In het bovenstaande voorbeeld, de programmeur is proberen om wat onwaarschijnlijk waarde alias 'fout' te kiezen. Het probleem is, als 'bar' is ooit per ongeluk aangeroepen met dezelfde waarde, zal het programma ten onrechte denken dat 'fout' returned.This gebeurt niet met Atoms was geweest. gebruik constant :: Atom 'error'; # gebruik constant 'error' => 999999; sub bar {mijn ($ arg) = @_; #Always terug $ arg voor demonstratiedoeleinden (niet fout). return 1? $ Arg: error; } Mijn $ foo = bar (999999); afdrukken "Foo: $ foo \ n"; print $ foo eq fout? "Foo fout geretourneerd." : "Foo terug $ foo."; Output: Foo terug 999999.SYNOPSIS gebruik constant :: Atom qw (rood, geel, blauw); mijn $ kleur = rood; afdrukken "Net zoals we dachten dat \ n" if $ kleur eq rood; afdrukken "Dit zal nooit gebeuren. \ n" if $ kleur eq blauw; afdrukken "Atomen nooit gelijk strings \ n" if $ kleur eq 'rood'; afdrukken "Kleur is" $ kleur-> naam "\ n"..; # De volgende werpt een uitzondering, omdat de toevoeging niet is gedefinieerd voor Atom objecten. $ Kleur + 1; Vereisten: · Perl

Constant :: atoom Gerelateerde software