Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.20
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
doc /
libgd-graph-perl /
examples /
samples /
[ HOME SHELL ]
Name
Size
Permission
Action
Makefile
2.31
KB
-rw-r--r--
error.pl
179
B
-rw-r--r--
logo.png
2.76
KB
-rw-r--r--
make_index.pl
1.39
KB
-rw-r--r--
rgb.txt
16.72
KB
-rw-r--r--
sample11.pl
930
B
-rw-r--r--
sample12.pl
895
B
-rw-r--r--
sample13.pl
805
B
-rw-r--r--
sample14.pl
2.45
KB
-rw-r--r--
sample15.pl
999
B
-rw-r--r--
sample16.pl
1.22
KB
-rw-r--r--
sample17.pl
1.04
KB
-rw-r--r--
sample18.pl
3.01
KB
-rw-r--r--
sample19.pl
2.82
KB
-rw-r--r--
sample1A.pl
1.08
KB
-rw-r--r--
sample1B.pl
958
B
-rw-r--r--
sample21.pl
705
B
-rw-r--r--
sample22.pl
563
B
-rw-r--r--
sample23.pl
2.69
KB
-rw-r--r--
sample29.pl
732
B
-rw-r--r--
sample31.pl
706
B
-rw-r--r--
sample41.pl
807
B
-rw-r--r--
sample42.dat
103
B
-rw-r--r--
sample42.pl
974
B
-rw-r--r--
sample51.pl
665
B
-rw-r--r--
sample52.pl
873
B
-rw-r--r--
sample53.pl
1.25
KB
-rw-r--r--
sample54.dat
30.73
KB
-rw-r--r--
sample54.pl
1.01
KB
-rw-r--r--
sample55.pl
665
B
-rw-r--r--
sample56.pl
1.16
KB
-rw-r--r--
sample57.pl
579
B
-rw-r--r--
sample58.pl
715
B
-rw-r--r--
sample61.pl
1.33
KB
-rw-r--r--
sample62.pl
838
B
-rw-r--r--
sample63.pl
1.03
KB
-rw-r--r--
sample64.pl
1.48
KB
-rw-r--r--
sample71.pl
2.56
KB
-rw-r--r--
sample72.pl
1.04
KB
-rw-r--r--
sample91.pl
512
B
-rw-r--r--
sample92.pl
616
B
-rw-r--r--
sample93.pl
491
B
-rw-r--r--
sample94.pl
685
B
-rw-r--r--
sample95.pl
2.62
KB
-rw-r--r--
save.pl
288
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : sample16.pl
use strict; use GD::Graph::bars; use GD::Graph::hbars; require 'save.pl'; my @data = ( [ qw( 1st 2nd 3rd 4th 5th 6th 7th 8th 9th ) ], [ 5, 12,undef, 33, 19, 8, 5, 15, 21], [ -6, -5, -9, -8, -11, -9.3,undef, -9, -12] ); my $refit = 4; sub y_format { my $value = shift; if ($value < 0) { return sprintf('-$%3d', abs($value) * $refit); } return sprintf('$%3d', $value * $refit); } my @names = qw/sample16 sample16-h/; for my $my_graph (GD::Graph::bars->new, GD::Graph::hbars->new) { my $name = shift @names; print STDERR "Processing $name\n"; $my_graph->set( x_label => 'Day', y_label => 'AUD', title => 'Credits and Debits', y_max_value => 35, y_min_value => -15, y_tick_number => 10, y_label_skip => 2, overwrite => 1, dclrs => [ qw( green lred ) ], axislabelclr => 'black', legend_placement => 'RB', zero_axis_only => 0, y_number_format => \&y_format, x_label_position => 1/2, transparent => 0, ); $my_graph->set_legend( 'credits', 'debets' ); $my_graph->plot(\@data); save_chart($my_graph, $name); } 1;
Close
