Gnome2 :: vfs. GNOME2 :: VFS ist eine Perl-Schnittstelle zur 2.x-Serie der GNOME VFS-Bibliothek.
Jetzt downloaden

Gnome2 :: vfs. Ranking & Zusammenfassung

Gnome2 :: vfs. Stichworte

GNOME Perl-Modul vfs. Gnome VFS-Bibliothek. VFS Perl-Schnittstelle

Gnome2 :: vfs. Beschreibung

GNOME2 :: VFS ist eine Perl-Schnittstelle zur 2.x-Serie der GNOME-VFS-Bibliothek. GNOME2 :: VFS ist eine Perl-Schnittstelle zur 2.x-Serie der GNOME-VFS-Bibliothek.Synopsis verwenden GNOME2 :: VFS; sub the_already {meine ($ action) = @_; sterben ("ein Fehler aufgetreten, während $ action.n"); } Die_already ("Initialisierung von Gnome VFS"), sofern nicht (Gnome2 :: VFS -> init ()); Meine $ Quelle = "http://www.perldoc.com/about.html"; mein ($ Ergebnis, $ Griff, $ Info); # Öffnen Sie eine Verbindung zu Perldoc. ($ Ergebnis, $ Griff) = GNOME2 :: VFS -> Öffnen ($ Source, "Read"); the_already ("Anschluss an" $ SOURAL '"), es sei denn, (Ergebnis EQ" OK "); # Holen Sie sich die Dateiinformationen. ($ Ergebnis, $ Info) = $ Griff -> get_file_info ("Default"); the_already ("Informationen über '$ SOURCE'" "), es sei denn ($ Ergebnis EQ" OK "); # Lesen Sie den Inhalt. meine $ bytes = $ info -> {Größe}; meine $ bytes_read = 0; mein $ puffer = ""; Machen Sie {mein ($ tmp_buffer, $ tmp_bytes_read); ($ Ergebnis, $ tmp_bytes_read, $ tmp_buffer) = $ Griff -> Lesen ($ Bytes - $ Bytes_Read); $ Puffer. = $ tmp_buffer; $ bytes_read + = $ tmp_bytes_read; } Während ($ Ergebnis EQ "OK" und $ Bytes_Read <$ bytes); the_already ("$ bytes bytes von '$ source'") es sei denn ($ ergebnis eq "ok" $ bytes_read == $ bytes); # schlie

Gnome2 :: vfs. Zugehörige Software