- Itt van az ASUS legfrissebb, AMD platformra épülő mini PC-je
- Jegeli pénznyelő projektjét az Apple, az okosszemüvegben látják a jövőt
- Olcsónak ígérkező, madzagos egér jelent meg az ASUS ROG-os portfóliójában
- Kriptobányászatra használta az AI-ra vásárolt hardvereket a Northern Data?
- Jövőre jósolják a memóriahiányt, ami egy évtizedig is fennmaradhat?
- Projektor topic
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Socket AM5-ös alaplap Sapphire logóval
- Épített vízhűtés (nem kompakt) topic
- Nem indul és mi a baja a gépemnek topik
- Október közepétől kezdi el megoldani a PC-s játékosok gondját a Microsoft
- NVIDIA GeForce RTX 3080 / 3090 / Ti (GA102)
- Házimozi belépő szinten
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
Aktív témák
-
benczeb
aktív tag
Sziasztok!
Perlből házit kell írnunk (CGI), a lényeg, hogy egy mysql adatbázishoz csatlakozunk a DBI modulon keresztül, és nem tudunk megírni egy lekérdezést. Nem étrjük, hogy hogy adja vissza, illetve milyen függvénnyel.
Így próbálkozunk:
#!/usr/bin/perl
print ''Content-type: text/html '';
use strict;
use DBI;
my $q = $ENV{'QUERY_STRING'};
my @param = split (/&/, $q);
my %c = ();
my $p;
my %hash=();
foreach $p (@param) {
my ($n, $v) = split (/=/, $p);
$v =~ tr/+/ /;
$v =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack(''C'', hex($1))/eg;
$c{$n} = $v;
# print $n, '':'', $c{$n}, '' <BR>'';
$hash{$n}=$c{$n};
}
my $database = ''A'';
my $hostname = ''localhost'';
my $user = ''A'';
my $password = 'A';
my $dsn = ''DBI:mysql:database=$database;host=$hostname;mysql_socket=/var/run/mysqld/mysqld.sock'';
my $dbh = DBI->connect($dsn, $user, $password, { PrintError=>0 }) || die $DBI::errstr;
########## ÉS EZ NEM MŰKÖDIK!!!! ##############
# lekérdezés az adatbázisból
if ($hash{'mit_csinal'}==''lekerdez'') {
# my $sql_text = ''SELECT * FROM tabla_1 WHERE nev=($hash{'nev'})'';
my $sql_text = ''SELECT * FROM tabla_1'';
my $sql = $dbh->prepare($sql_text);
$sql->execute();
#print $sql->rows, '' '';
:((########### ITT MILYEN FÜGGVÉNYT, HOGYAN???????? #########xx
$dbh->do($sql_text) || die $DBI::errstr;
$sql->finish();
}
$dbh->disconnect();
Aktív témák
- Bomba ár! Dell Latitude 7320 - i5-11GEN I 8GB I 256-512SSD I HDMI I 13,3" FHD I Cam I W11 I Gari!
- LG UltraFine 4K és Smart Monitorok -30%
- GYÖNYÖRŰ iPhone 13 mini 256GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS3311
- iKing.Hu - Google Pixel 10 Tensor G5, 120 Hz OLED, tripla kamera-128 GB Használt, karcmentes Gari
- Részletfizetés . ASUS TUF Gaming A18 FA808UM-S8019
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest