Basset :: Maschine.

Basset :: Machine ist ein Perl-Modul, das verwendet wird, um Maschinen anzusteuern.
Jetzt downloaden

Basset :: Maschine. Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Jim Thomason
  • Website des Verlags:
  • http://search.cpan.org/~jimt/Basset-1.04/lib/Basset/Machine.pm

Basset :: Maschine. Stichworte


Basset :: Maschine. Beschreibung

Basset :: Machine ist ein Perl-Modul, das zum Status von Maschinen verwendet wird. Basset :: Machine ist ein Perl-Modul, das zum Status von Maschinen verwendet wird. SynopsisEan-Beispiel ist am besten. Lass uns ein einfaches versuchen. Paket meine :: Machine; Verwenden Sie Basset :: Objekt; Basset :: Objekt-> Vererben (__ paket__, 'maschine'); SUBST START {RETURN SHIFT-> STATE ('login'); } Sublogin {mein $ self = schalte; mein $ heap = $ self-> heap; if ($ heap -> {'loggedin}) {return $ self-> staat (' erfolg '); } else {return $ self-> staat ('prompt'); }} Sub Prompt {My $ self = Shift; drucken "Bitte geben Sie Ihren Benutzernamen ein (muss" Bob "sein):"; chomp (mein $ name =); $ self -> {'heap'} -> {'Loggedin'} = 1 wenn $ Name EQ 'BOB'; Rückgabe $ selbst-> Zustand ('Login'); } Suberfolg {mein $ self = shift; drucken "Sie sind angemeldetes Inn"; Rückgabe $ selbst-> Kündigung; } 1; --- #! / usr / bin / perl benutzen meine :: maschine; MY :: Machine-> Ausführen; Anforderungen: · Perl.


Basset :: Maschine. Zugehörige Software