Linux moon.hostseba.com 4.18.0-553.51.1.lve.el8.x86_64 #1 SMP Tue May 6 15:14:12 UTC 2025 x86_64
LiteSpeed
Server IP : 103.174.152.68 & Your IP : 216.73.216.9
Domains :
Cant Read [ /etc/named.conf ]
User : julaysp1
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
perl5 /
vendor_perl /
GD /
Graph /
Delete
Unzip
Name
Size
Permission
Date
Action
Data.pm
16.79
KB
-rw-r--r--
2013-06-22 21:40
Error.pm
8.96
KB
-rw-r--r--
2013-07-05 14:46
FAQ.pod
5.77
KB
-rw-r--r--
2013-06-22 21:40
area.pm
2.91
KB
-rw-r--r--
2013-06-22 21:40
axestype.pm
60.28
KB
-rw-r--r--
2016-11-21 11:57
bars.pm
12.3
KB
-rw-r--r--
2015-12-27 16:47
colour.pm
7.57
KB
-rw-r--r--
2013-06-22 21:40
hbars.pm
1.59
KB
-rw-r--r--
2013-06-22 21:40
lines.pm
4.34
KB
-rw-r--r--
2013-06-22 21:40
linespoints.pm
1.19
KB
-rw-r--r--
2013-06-22 21:40
mixed.pm
2.91
KB
-rw-r--r--
2013-06-22 21:40
pie.pm
12.58
KB
-rw-r--r--
2015-12-27 16:43
points.pm
4.99
KB
-rw-r--r--
2013-06-22 21:40
utils.pm
1.22
KB
-rw-r--r--
2013-06-22 21:40
Save
Rename
#========================================================================== # Copyright (c) 1995-1999 Martien Verbruggen #-------------------------------------------------------------------------- # # Name: # GD::Graph::utils.pm # # Description: # Package of general utilities. # # $Id: utils.pm,v 1.7 2005/12/14 04:13:36 ben Exp $ # #========================================================================== package GD::Graph::utils; ($GD::Graph::utils::VERSION) = '$Revision: 1.7 $' =~ /\s([\d.]+)/; use strict; use vars qw( @EXPORT_OK %EXPORT_TAGS ); require Exporter; @GD::Graph::utils::ISA = qw( Exporter ); @EXPORT_OK = qw(_max _min _round); %EXPORT_TAGS = (all => [qw(_max _min _round)]); sub _max { my ($a, $b) = @_; return undef if (!defined($a) and !defined($b)); return $a if (!defined($b)); return $b if (!defined($a)); ( $a >= $b ) ? $a : $b; } sub _min { my ($a, $b) = @_; return undef if (!defined($a) and !defined($b)); return $a if (!defined($b)); return $b if (!defined($a)); ( $a <= $b ) ? $a : $b; } sub _round { sprintf "%.0f", shift } sub version { $GD::Graph::utils::VERSION } "Just another true value";