Klasse :: vergelijkbaar

Klasse :: vergelijkbaar is een basisklasse voor vergelijkbare objecten.
Download nu

Klasse :: vergelijkbaar Rangschikking & Samenvatting

Advertentie

  • Rating:
  • Vergunning:
  • Perl Artistic License
  • Prijs:
  • FREE
  • Naam uitgever:
  • Stevan Little
  • Uitgever website:
  • http://search.cpan.org/~stevan/

Klasse :: vergelijkbaar Tags


Klasse :: vergelijkbaar Beschrijving

Klasse :: vergelijkbaar is een basisklasse voor vergelijkbare objecten. Synopsis # Een voorbeeld subklasse pakket valuta :: usd; Gebruik basis 'klasse :: vergelijkbaar'; subnieuw {mijn $ klasse = verschuiving; zegen {waarde => shift}, $ klasse; } subwaarde {(shift) -> {value}} subvergelijk {My ($ Left, $ Right) = @_; # Als we vergelijken met een ander # valuta-object, vergelijken de waarden vergelijken als (Ref ($ Right) $ Right-> ISA ('Valuta :: usd')) {return $ Left-> Waarde $ Right-> Waarde; } # Andersaangaan we vergelijken # tegen een numerieke waarde van een soort anders {return $ rest-> waarde $ toch; }} # Een voorbeeld gebruik van de klas :: vergelijkbaar voorwerp mijn $ buck_fifty = valuta :: usd-> nieuw (1,50); mijn $ dollar_n_half = âcuryy :: usd-> nieuw (1,50); ($ buck_fifty == $ dollar_n_half) # Deze zijn gelijk (1,75> $ buck_fifty) # 1.75 is meer dan een bok vijftig mijn $ twee_bits = valuta :: usd-> nieuw (0,25); ($ two_bits <$ dollar_n_half) # 2 bits is minder dan een dollar en een half ($ two_bits == 0,25) # twee bits is gelijk aan 25 centen-eisen: · Perl


Klasse :: vergelijkbaar Gerelateerde software