Gecko [ betsfootball.net ]

Linux vmi2545633.contaboserver.net 6.1.0-32-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.129-1 (2025-03-06) x86_64
Apache/2.4.62 (Debian)
Server IP : 127.0.0.1 & Your IP : 127.0.0.1
Domains : Cant Read [ /etc/named.conf ]
User : www-data

Name	Size	Permission	Date
file	[ DIR ]	drwxr-xr-x	2025-04-08 14:06
urn	[ DIR ]	drwxr-xr-x	2025-04-08 14:06
Escape.pm	7.73 KB	-rw-r--r--	2022-11-02 17:03
Heuristic.pm	6.37 KB	-rw-r--r--	2022-11-02 17:03
IRI.pm	794 B	-rw-r--r--	2022-11-02 17:03
QueryParam.pm	655 B	-rw-r--r--	2022-11-02 17:03
Split.pm	2.3 KB	-rw-r--r--	2022-11-02 17:03
URL.pm	5.36 KB	-rw-r--r--	2022-11-02 17:03
WithBase.pm	3.77 KB	-rw-r--r--	2022-11-02 17:03
_foreign.pm	107 B	-rw-r--r--	2022-11-02 17:03
_generic.pm	6.66 KB	-rw-r--r--	2022-11-02 17:03
_idna.pm	2.03 KB	-rw-r--r--	2022-11-02 17:03
_ldap.pm	3.17 KB	-rw-r--r--	2022-11-02 17:03
_login.pm	231 B	-rw-r--r--	2022-11-02 17:03
_punycode.pm	5.49 KB	-rw-r--r--	2022-11-02 17:03
_query.pm	4.37 KB	-rw-r--r--	2022-11-02 17:03
_segment.pm	416 B	-rw-r--r--	2022-11-02 17:03
_server.pm	3.79 KB	-rw-r--r--	2022-11-02 17:03
_userpass.pm	1.01 KB	-rw-r--r--	2022-11-02 17:03
data.pm	3.31 KB	-rw-r--r--	2022-11-02 17:03
file.pm	9.46 KB	-rw-r--r--	2022-11-02 17:03
ftp.pm	1.03 KB	-rw-r--r--	2022-11-02 17:03
gopher.pm	2.37 KB	-rw-r--r--	2022-11-02 17:03
http.pm	425 B	-rw-r--r--	2022-11-02 17:03
https.pm	144 B	-rw-r--r--	2022-11-02 17:03
ldap.pm	2.86 KB	-rw-r--r--	2022-11-02 17:03
ldapi.pm	440 B	-rw-r--r--	2022-11-02 17:03
ldaps.pm	144 B	-rw-r--r--	2022-11-02 17:03
mailto.pm	1.62 KB	-rw-r--r--	2022-11-02 17:03
mms.pm	125 B	-rw-r--r--	2022-11-02 17:03
news.pm	1.42 KB	-rw-r--r--	2022-11-02 17:03
nntp.pm	127 B	-rw-r--r--	2022-11-02 17:03
nntps.pm	144 B	-rw-r--r--	2022-11-02 17:03
pop.pm	1.18 KB	-rw-r--r--	2022-11-02 17:03
rlogin.pm	129 B	-rw-r--r--	2022-11-02 17:03
rsync.pm	207 B	-rw-r--r--	2022-11-02 17:03
rtsp.pm	125 B	-rw-r--r--	2022-11-02 17:03
rtspu.pm	126 B	-rw-r--r--	2022-11-02 17:03
sftp.pm	98 B	-rw-r--r--	2022-11-02 17:03
sip.pm	1.63 KB	-rw-r--r--	2022-11-02 17:03
sips.pm	143 B	-rw-r--r--	2022-11-02 17:03
snews.pm	172 B	-rw-r--r--	2022-11-02 17:03
ssh.pm	175 B	-rw-r--r--	2022-11-02 17:03
telnet.pm	128 B	-rw-r--r--	2022-11-02 17:03
tn3270.pm	128 B	-rw-r--r--	2022-11-02 17:03
urn.pm	2.12 KB	-rw-r--r--	2022-11-02 17:03

Rename

#
# Written by Ryan Kereliuk <ryker@ryker.org>.  This file may be
# distributed under the same terms as Perl itself.
#
# The RFC 3261 sip URI is <scheme>:<authority>;<params>?<query>.
#

package URI::sip;

use strict;
use warnings;

use parent qw(URI::_server URI::_userpass);

use URI::Escape ();

our $VERSION = '5.17';

sub default_port { 5060 }

sub authority
{
    my $self = shift;
    $$self =~ m,^($URI::scheme_re:)?([^;?]*)(.*)$,os or die;
    my $start = $1;
    my $authoritystr = $2;
    my $rest = $3;

if (@_) {
        $authoritystr = shift;
        $authoritystr =~ s/([^$URI::uric])/ URI::Escape::escape_char($1)/ego;
        $$self = $start . $authoritystr . $rest;
    }
    return $authoritystr;
}

sub params_form
{
    my $self = shift;
    $$self =~ m,^((?:$URI::scheme_re:)?)(?:([^;?]*))?(;[^?]*)?(.*)$,os or die;
    my $start = $1 . $2;
    my $paramstr = $3;
    my $rest = $4;

if (@_) {
	my @paramarr;
	for (my $i = 0; $i < @_; $i += 2) {
	    push(@paramarr, "$_[$i]=$_[$i+1]");
	}
	$paramstr = join(";", @paramarr);
	$$self = $start . ";" . $paramstr . $rest;
    }
    $paramstr =~ s/^;//o;
    return split(/[;=]/, $paramstr);
}

sub params
{
    my $self = shift;
    $$self =~ m,^((?:$URI::scheme_re:)?)(?:([^;?]*))?(;[^?]*)?(.*)$,os or die;
    my $start = $1 . $2;
    my $paramstr = $3;
    my $rest = $4;

if (@_) {
        $paramstr = shift; 
        $$self = $start . ";" . $paramstr . $rest;
    }
    $paramstr =~ s/^;//o;
    return $paramstr;
}

# Inherited methods that make no sense for a SIP URI.
sub path {}
sub path_query {}
sub path_segments {}
sub abs { shift }
sub rel { shift }
sub query_keywords {}