Linux unitednationsplay.com 3.10.0-1160.45.1.el7.x86_64 #1 SMP Wed Oct 13 17:20:51 UTC 2021 x86_64
nginx/1.20.1
Server IP : 188.130.139.92 & Your IP : 3.16.130.38
Domains :
Cant Read [ /etc/named.conf ]
User : web
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
doc /
perl-DBD-MySQL-4.023 /
eg /
Delete
Unzip
Name
Size
Permission
Date
Action
bug14979.pl
789
B
-rw-r--r--
2012-08-28 01:30
bug21028.pl
2.19
KB
-rw-r--r--
2012-08-28 01:30
bug30033.pl
868
B
-rw-r--r--
2012-08-28 01:30
bug30033pg.pl
456
B
-rw-r--r--
2012-08-28 01:30
decimal_test.pl
839
B
-rw-r--r--
2012-08-28 01:30
issue21946.pl
848
B
-rw-r--r--
2012-08-28 01:30
prepare_memory_usage.pl
450
B
-rw-r--r--
2012-08-28 01:30
proc_example1.pl
1.03
KB
-rw-r--r--
2012-08-28 01:30
proc_example2.pl
1.38
KB
-rw-r--r--
2012-08-28 01:30
proc_example2a.pl
1.29
KB
-rw-r--r--
2012-08-28 01:30
proc_example2b.pl
1.27
KB
-rw-r--r--
2012-08-28 01:30
proc_example3.pl
901
B
-rw-r--r--
2012-08-28 01:30
proc_example4.pl
1.36
KB
-rw-r--r--
2012-08-28 01:30
Save
Rename
#!/usr/bin/perl use strict; use warnings; use Data::Dumper; use DBI; my $dsn = "DBI:Pg:database=postgres;host=localhost"; my $dbh = DBI->connect( $dsn, 'postgres', '', { RaiseError => 1 } ) or die $DBI::errstr; $dbh->do('CREATE TABLE buggy ( id INT )'); $dbh->do('INSERT INTO buggy (id) VALUES (1)'); my $ref= $dbh->selectrow_arrayref(<<END, {}, 1); SELECT id FROM buggy -- it's a bug! WHERE id = ? END print Dumper $ref; $dbh->do('DROP TABLE buggy');