Edit D:\app\Administrator\product\11.2.0\dbhome_1\perl\lib\version.pm
#!perl -w package version; use 5.005_04; use strict; use vars qw(@ISA $VERSION $CLASS *qv); $VERSION = 0.74; $CLASS = 'version'; # Preloaded methods go here. sub import { my ($class) = @_; my $callpkg = caller(); no strict 'refs'; *{$callpkg."::qv"} = sub {return bless version::qv(shift), $class } unless defined (&{"$callpkg\::qv"}); } 1;
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de