|
Server IP : 145.79.58.44 / Your IP : 216.73.217.45 Web Server : LiteSpeed System : Linux in-mum2-web2213.main-hosting.eu 5.14.0-611.35.1.el9_7.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Feb 25 03:46:09 EST 2026 x86_64 User : u882412079 ( 882412079) PHP Version : 8.3.30 Disable Function : system, exec, shell_exec, passthru, mysql_list_dbs, ini_alter, dl, symlink, link, chgrp, leak, popen, apache_child_terminate, virtual, mb_send_mail MySQL : OFF | cURL : ON | WGET : ON | Perl : OFF | Python : OFF Directory (0755) : /../home/../sbin/../share/pam.d/../aclocal-1.16/../perl5/ |
| [ Home ] | [ C0mmand ] | [ Upload File ] |
|---|
package bytes;
sub length (_) {
BEGIN { bytes::import() }
return CORE::length($_[0]);
}
sub substr ($$;$$) {
BEGIN { bytes::import() }
return
@_ == 2 ? CORE::substr($_[0], $_[1]) :
@_ == 3 ? CORE::substr($_[0], $_[1], $_[2]) :
CORE::substr($_[0], $_[1], $_[2], $_[3]) ;
}
sub ord (_) {
BEGIN { bytes::import() }
return CORE::ord($_[0]);
}
sub chr (_) {
BEGIN { bytes::import() }
return CORE::chr($_[0]);
}
sub index ($$;$) {
BEGIN { bytes::import() }
return
@_ == 2 ? CORE::index($_[0], $_[1]) :
CORE::index($_[0], $_[1], $_[2]) ;
}
sub rindex ($$;$) {
BEGIN { bytes::import() }
return
@_ == 2 ? CORE::rindex($_[0], $_[1]) :
CORE::rindex($_[0], $_[1], $_[2]) ;
}
1;