Dashboard
PHP:
8.3.33
OS:
Linux
User:
letter7
/
/
usr
/
share
/
perl5
/
URI
📤 Upload
📝 New File
📁 New Folder
Close
Editing: http.pm
package URI::http; use strict; use warnings; our $VERSION = '5.09'; use parent 'URI::_server'; sub default_port { 80 } sub canonical { my $self = shift; my $other = $self->SUPER::canonical; my $slash_path = defined($other->authority) && !length($other->path) && !defined($other->query); if ($slash_path) { $other = $other->clone if $other == $self; $other->path("/"); } $other; } 1;
Save
Cancel