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 /
imagemagick-6-common /
examples /
demo /
[ HOME SHELL ]
Name
Size
Permission
Action
Generic.ttf.gz
12.63
KB
-rw-r--r--
Makefile
360
B
-rw-r--r--
README
124
B
-rw-r--r--
Turtle.pm
868
B
-rw-r--r--
annotate.pl
1.53
KB
-rw-r--r--
annotate_words.pl
1.9
KB
-rwxr-xr-x
button.pl
335
B
-rw-r--r--
compose-specials.pl.gz
1.43
KB
-rw-r--r--
composite.pl
1.47
KB
-rw-r--r--
demo.pl.gz
2.2
KB
-rw-r--r--
dst.png
270
B
-rw-r--r--
lsys.pl
2.26
KB
-rw-r--r--
model.gif
22.88
KB
-rw-r--r--
piddle.pl
1.84
KB
-rw-r--r--
pink-flower.gif
544
B
-rw-r--r--
pixel-fx.pl
1.48
KB
-rwxr-xr-x
red-flower.gif
694
B
-rw-r--r--
settings.pl
697
B
-rwxr-xr-x
shadow-text.pl
476
B
-rw-r--r--
shapes.pl
1.19
KB
-rw-r--r--
single-pixels.pl
1.07
KB
-rwxr-xr-x
smile.gif
1.32
KB
-rw-r--r--
src.png
305
B
-rw-r--r--
steganography.pl
597
B
-rw-r--r--
tile.gif
1.53
KB
-rw-r--r--
tree.pl
744
B
-rw-r--r--
yellow-flower.gif
565
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : shapes.pl
#!/usr/bin/perl # GD example using PerlMagick methods. use Image::Magick; # # Create a 300x300 white canvas. # $image=Image::Magick->new; $image->Set(size=>'300x300'); $image->Read('xc:white'); # # Draw shapes. # $tile=Image::Magick->new; $tile->Read('tile.gif'); $image->Draw(primitive=>'Polygon',tile=>$tile,fill=>'none', points=>'30,30 100,10 190,290 30,290'); $image->Draw(stroke=>'red',primitive=>'Ellipse',stroke=>'black',fill=>'red', strokewidth=>5,points=>'100,100 50,75 0,360'); $image->Draw(primitive=>'Polygon',fill=>'none',stroke=>'black',strokewidth=>5, points=>'30,30 100,10 190,290 30,290'); $image->FloodfillPaint(geometry=>'+132+62',fill=>'blue',bordercolor=>'black', invert=>'true'); # # Draw text. # $image->Annotate(font=>'Generic.ttf',fill=>'red',geometry=>'+150+20', pointsize=>18,text=>'Hello world!'); $image->Annotate(font=>'Generic.ttf',fill=>'blue',geometry=>'+150+38', pointsize=>14,text=>'Goodbye cruel world!'); $image->Annotate(font=>'Generic.ttf',fill=>'black',geometry=>'+280+120', pointsize=>14,text=>"I'm climbing the wall!",rotate=>90.0); # # Write image. # print "Write image...\n"; $image->Write('shapes.gif'); print "Display image...\n"; $image->Write('win:');
Close
