Financiën :: Micel :: LINEPARSER

Valideer en parseer een check Micre-string
Download nu

Financiën :: Micel :: LINEPARSER Rangschikking & Samenvatting

Advertentie

  • Rating:
  • Vergunning:
  • Perl Artistic License
  • Prijs:
  • FREE
  • Naam uitgever:
  • Leo Charre
  • Uitgever website:
  • http://search.cpan.org/~leocharre/

Financiën :: Micel :: LINEPARSER Tags


Financiën :: Micel :: LINEPARSER Beschrijving

Valideren en parseren van een check Micre-string Financiën :: Micl :: LINEPARSER is een PERL-module die een MICR-lijncode in delen kan ontleden. Vertel ons bovendien of een string-bon een MICE-code bevat. Als u een touw hebt en deze wilt ontleden als de micrine van een cheque, is dit handig. Ik gebruik deze module momenteel om de Office-scan te laten scannen in documenten en het gebruik van GOCS, ik krijg een string uit het gescande beeld. Dan met deze module parseer ik de MICR-lijn- als er daar is. Ik benoem de documenten voor het archiveren na de MILJE CODE.BVIELE MET SCANNEN, de MICS-symbolen hebben geen Unicode-equivalenten - dus verschillende bedrijven hebben de symbolen voor alfa-tegenhangers geschakeld. Deze module accepteert de symbolen die meer dan één teken is. Dit is Bagcuse GoCS kan niet zoiets in één personage groeperen. Je hebt misschien je OCR-software getraind om degenen te vervangen door iets als TT (transit, dat eruit ziet :) en UUU (op ons, die eruit ziet zoals || "). Deze module kan worden verteld over instantiation, dat de symbolen iets anders zijn dan de standaardinstellingen. Ik heb bijvoorbeeld mijn GOCS getraind om te veranderen || "naar CCC en |: naar AA - dus ik start een object-exemplaar zoals SO: My $ Mic = Nieuwe Finance :: Micl :: LINEPARSER ({string => $ string_from_gocr, on_us_symbol => 'CCC', Transit_Symbol => 'AA', DASH_SYMBOL => 'DDD', AMMOUW_SYMBOL => 'XXX',}); Standaard worden deze gewijzigd in: * Transit-symbool: T * AMMONT SYMBOL: X * ON -US Symbool: u * Dash Symbol: Dthat is, wanneer u methoden zoekt, zoals $ MIR-> ON_US, is de return on_us-waarde daarin u en niet CCC.As van deze tijd, als u de symbolen wilt wijzigen naar iets Anders is het aan jou om de output.synopsis te verwerken Finance :: Micr :: Lineparker; mijn $ Micr = Finance :: Micel :: LINEPARSER-> NIEUW ({string => $ string}); Print "is dit MICE CODE? " Werk samen met. Dus. Laten we een klein CLI-script maken dat potentieel wordt verkocht en vertelt ons als er een MUNE-code is en iets over het. Micrline.pl: #! / usr / bin / Perl -W gebruik strikt; gebruik Finance: : MICK :: LINEPARSER; MIJN $ STRUARE = $ ARGV ; $ string of sterven ('Ontbrekend Arg'); mijn $ Micr = Nieuwe Finance :: Micl :: LINEPARSER ({string => $ string}); als ($ $ MIR-> Geldig) {Print "Er is een geldige MICR-lijn aanwezig:". $ Micr-> Micr. " "; afdrukken" Het type controle is: ". $ Micr-> Get_check_type." "; afdrukken" Het routeringsnummer is: ". $ Mic-> Routering_Number." ", afdrukken" Het vinknummer is: ". $ Mic-> Check_Number." "; Print" Status: ". $ Micr-> Status;} Elsif ($ Mic-> is_unkNown_Check) {print" Ik zie hier geen volledige geldige MICR-lijn, maar dit is wat ik kan matchen ".". Als Dit is een bedrijfscontrole: ". $ Micr-> Micle." "; PRINT" Status: ". $ Micr-> Status;} anders {print" Dit is opgeleverd aan mij. "; Print" Status: ". $ Micr-> Status;} Nu in uw terminal: # PERL ./MICRLINE.PL U232342U_T23424T_2342424U Eisen: · Perl


Financiën :: Micel :: LINEPARSER Gerelateerde software