Data type Gegevens :: Type is een PERL-module met veelzijdige gegevens- en waarde-typen.
Download nu

Data type Rangschikking & Samenvatting

Data type Tags

Perl-module gegevens Veelzijdig veelzijdige data types waarde

Data type Beschrijving

Data :: Type is een Perl-module met veelzijdige data en value types. Data :: Type is een Perl-module met veelzijdige data en de waarde types.SYNOPSIS gebruik Data :: Type qw (: all); gebruik Error qw (: try); try {controleren $ e-mail, e-mail; controleren $ homepage, URI ( 'http'); controleren $ cc, Creditcard ( 'Mastercard', 'VISA'); controleren $ answer_a, yesno; controleren $ sekse, gender; Controleert 'één', ENUM (qw (een twee drie)); Controleert , SET (qw (een twee drie vier vijf zes))); controleren $ server_ip4, IP (v4 '); controleren $ server_ip6, IP ( 'v6'); controleren 'A35231AH1', CINS; controleren '14565935', ISSN; controleren 'DE', langCode; controleren 'Duits', LANGNAME; verifiëren '012345678905', UPC (); verifiëren '5276440065421319', CREDITCARD ( 'MasterCard')); Controleert 'ATGCAAAT', BIO :: DNA; Controleert 'AUGGGAAAU', BIO :: RNA; controleren '01001001110110101', BINARY; controleren '0F 0C 0A', HEX; controleren '0', gedefinieerd; Controleert '234', NUM (20); Controleert '1', BOOL ( 'true'); controleren '100', INT; controleren '1.1', REAL; mijn $ foo = zegenen ( '123', 'iets'); controleren $ foo, REF; controleren $ foo, REF (qw (iets anders)); Controleert , REF ( 'ARRAY'); Controleert '' x 20, VARCHAR (20); Controleert '2001-01-01', DATE (MYSQL); Controleert '16 november 9422:28:20 PST', DATE ( 'DATEPARSE'); controleren '9999-12-3123:59:59', DATETIME; controleren '1970-01-0100:00:00', TIMESTAMP; controleren '-838: 59: 59', TIME; controleren '2155', YEAR; Controleert '69', JAAR (2); Controleert '0' x 20 TinyText; Controleert '0' x 20 MEDIUMTEXT; Controleert '0' x 20 longtext; Controleert '0' x 20 TEKST; Controleert '80', PORT; controleren 'www.cpan.org', DOMEIN; } Catch Type :: Uitzondering met {mijn $ e = shift; printf "Ik verwachtte '% s' % s op% s regel% sn", $ e> waarde, $ e> type-> info, $ e> was_file, $ e> was_line; foreach my $ binnenkomst (testplan ($ e-> type)) {printf "texpecting is% s% s", $ ingang -> ? 'Is': 'niet', $ ingang -> -> info (); }}; # Geloof het of niet, dit werkt echt foreach (EMAIL, WORD, Creditcard ( 'Mastercard', 'VISA), BIO :: DNA, HEX) {print $ _-> info; print $ _-> gebruik; print $ _-> export; # Heeft het andere namen print $ _-> param; # Wat zijn mijn keuze wil zeggen print $ _-> isa ( 'iType :: Business'); # Is het een business-gerelateerde soort? print $ _-> VERSION; # Eerste verschijning in Data :: Type vrijlating} # gebonden interface (alias 'typ') try {typ ENUM (qw (DNA RNA)), (mijn $ a, my $ b); afdrukken "a is typ'ed" als istyp ($ a); A $ = 'DNA'; # $ Alias accepteert alleen 'DNA' of 'RNA' $ a = 'RNA'; $ A = 'XNA'; # Gooit uitzondering untyp ($ alias); } Catch Type :: Uitzondering :: met {printf "Ik verwachtte '% s' % s op% s regel% sn", $ e> waarde, $ e> type-> info, $ e> was_file, $ e -> was_line; }; dverify ($ email, email) of sterven $ !; mijn $ g = Data :: Type :: guard-> new (toestaan => # gezegend objecten van dat type test => {email => EMAIL (1), # mxcheck ON! zie E-mail :: Valid voornaam => WORD, social_id => , contacten => sub {mijn% args = @_; bestaat $ args {lucy}}}); $ G-> inspecteren ($ h); # Compacte versie overify {email => EMAIL (1), voornaam => WOORD}, $ object_a, $ object_b; afdrukken toc (); catalogus () te drukken; Deze module ondersteunt veelzijdige data en value types. Uit de gewone het ondersteunt geparameteriseerde types (zoals databases hebben dat wil zeggen VARCHAR (80)). Wanneer u een getypte variabele voeden tegen een aantal oneven data, deze module wordt uitgelegd wat hij had verwacht. Vereisten: · Perl

Data type Gerelateerde software