Datentyp Daten :: Typ ist ein Perl-Modul mit vielseitigen Daten- und Werttypen.
Jetzt downloaden

Datentyp Ranking & Zusammenfassung

Datentyp Stichworte

Perl-Modul Daten Vielseitig vielseitige Daten Werttypen

Datentyp Beschreibung

Daten :: Typ ist ein Perl-Modul mit vielseitigen Daten- und Werttypen. Daten :: Typ ist ein Perl-Modul mit vielseitigen Daten- und Werttypen.Synopsis Verwenden Sie Daten :: Typ QW (: ALL); Verwenden Sie den Fehler QW (: probieren); Versuchen Sie {Überprüfen Sie $ E-Mail, E-Mail; Überprüfen Sie $ Homepage, URI ('http'); Überprüfen Sie $ CC, CreditCard ('Mastercard', 'Visa'); Überprüfen Sie $ Antwort_A, JaNo; Überprüfen Sie $ Gender, Gender; Überprüfen Sie 'One', ENUM (QW (eins zwei drei)); Überprüfen Sie , eingestellt (QW (eins zwei drei vier fünf sechs)); Überprüfen Sie $ server_ip4, ip ('v4'); Überprüfen Sie $ server_ip6, ip ('v6'); Überprüfen Sie 'A35231AH1', Cins; Verify '14565935', Issn; Verify 'de', Langcode; Überprüfen Sie "Deutsch", Langname; Überprüfen Sie '012345678905', UPC (); Verify '5276440065421319', Creditcard ('Mastercard')); Verify 'atgcaaat', bio :: dna; Verify 'Augggaaau', Bio :: RNA; Überprüfen Sie '010010011101101010', binär; Überprüfen Sie '0F 0C 0A', Hex; Überprüfen Sie "0", definiert; Überprüfen Sie '234', Num (20); Überprüfen Sie '1', BOOL ('TRUE'); Überprüfen Sie '100', Int; Überprüfen Sie '1.1', echt; mein $ foo = segne ('123', 'etwas'); Überprüfen Sie $ foo, ref; Überprüfen Sie $ foo, ref (qw (etwas anderes)); Überprüfen Sie , ref ('Array'); Überprüfen Sie '' x 20, varchar (20); Verify '2001-01-01', Datum ('MySQL'); Überprüfen Sie '16 November 9422:28:20 PST ', Datum (' DateParse '); Überprüfen Sie '9999-12-3123:59:59', dateTime; Verify '1970-01-0100:00:00', Zeitstempel; Verify '-838: 59: 59', Zeit; Verify '2155', Jahr; Verify '69', Jahr (2); Überprüfen Sie '0' x 20, Tinytext; Überprüfen Sie '0' x 20, mitteltext; Überprüfen Sie '0' x 20, langtext; Überprüfen Sie '0' x 20, Text; Überprüfen Sie '80', Port; Überprüfen Sie 'www.cpan.org', Domain; } Fangart :: Ausnahme mit {My $ e = Shift; Printf "erwartet '% s'% s at% s line% Sn", $ E-> Wert, $ E-> Typ-> Info, $ E-> WAS_FILE, $ E-> WAS_LINE; FOREACH MEIN $ EINTRITT (TESTPLAN (TESTPLAN ($ E-> TYP)) {Printf "TEXPECTING IT% S% S", $ Eintrag -> ? 'lautet': 'ist nicht', $ Eintrag -> -> info (); }}; # Glauben Sie es oder nicht, das arbeitet wirklich feach (E-Mail, Word, Kreditkarten (Mastercard, "Visa"), BIO :: DNA, SEX) {drucken $ _-> info; drucken $ _-> nutzung; $ _-> exportieren; # Hat es andere Namen, drucken $ _-> param; # Was ist meine Wahl, drucken Sie $ _-> ISA ('itype :: Business'); # ist es ein angesetzter Typ? Drucken $ _-> Version; # Erster Apperance in Daten :: Type Release} # Tied Interface (Alias 'Typ') versuchen Sie {type atum (QW (DNA RNA)), (mein $ A, meine $ B); Drucken "A ist typisiert", wenn iTyp ($ A); $ a = 'dna'; # $ alias akzeptiert nur 'dna' oder 'rna' $ a = 'rna'; $ a = 'XNA'; # Wirwbst außer Acht Untype ($ alias); } Fangart :: Ausnahme :: Mit {printf "erwartet '% s'% s at% s line% Sn", $ E-> Wert, $ E-> Typ-> Info, $ E-> WAS_FILE, $ E -> WAS_LINE; }; DVERY ($ E-Mail, E-Mail) oder Die $!; Meine $ g = Daten :: Type :: Guard-> NEU (Erlauben => , # gesegnete Objekte dieser Typtests => {E-Mail => E-Mail (1), # MXCheck On! Siehe E-Mail: gültiger Vorname => word, social_id => , Kontakte => sub {my% args = @_; existiert $ args {lucy}},}); $ g-> inspect ($ h); # Compact-Version überreift {E-Mail => E-Mail (1), Vorname => word}, $ object_a, $ object_b; drucken toc (); Druckenkatalog (); Dieses Modul unterstützt vielseitige Daten- und Werttypen. Außerhalb des gewöhnlichen, unterstützt er parametrierte Typen (wie Datenbanken haben I.E. varchar (80)). Wenn Sie versuchen, eine typisierte Variable gegen einige ungerade Daten zu ernähren, erklärt dieses Modul, was er erwartet hätte. Anforderungen: · Perl.

Datentyp Zugehörige Software