- 1
echo "<FORM NAME=\"row\" ACTION=\"pdp_car_mis_valid.php\" METHOD=\"POST\" TARGET=\"_top\" ";?>onsubmit="blocker.style.display='block';blockfield.focus();return true;">
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+152
echo "<FORM NAME=\"row\" ACTION=\"pdp_car_mis_valid.php\" METHOD=\"POST\" TARGET=\"_top\" ";?>onsubmit="blocker.style.display='block';blockfield.focus();return true;">
Однажды встретил такое в серьезном проекте. Причем вроде опытный человек писал...
−844
SELECT
'X' `TYPEOF`
,161 AS `ID`
,pa.ARTICUL
,p.PRODUCT_NAME
,p.PRODUCT_INSTRUCTION
,p.PRODUCT_WEIGHT
,p.PRODUCT_VOLUME
,p.PRODUCT_RATING
,pm.MEASURE
,b.BRAND_NAME
,cs.COLL_NAME COLLECTION
,m.MAN_NAME MANUFACTORER
,pst.QUANTITY
,p.TIMESTAMP_X AS LAST_MODIFY
,pts.PRODUCT_NOTE
,pts.PRODUCT_DESCRIPTION
,pts.PRODUCT_IMAGE
,pts.PRODUCT_GALLERY
,pts.PRODUCT_ACTIVE
,pts.PRODUCT_ACTIVE_FROM
,pts.PRODUCT_ACTIVE_TO
,pts.PRODUCT_NEW
,pts.PRODUCT_LEADER
,pts.USER_ID
,pts.SITE_ID
,'X' CATEGORIES
,'X' FEATURES
,'X' RANGE_APPLICATION
,'X' RANGE_PRESCRIPTION
,'X' PRODUCT_PRICE
,'X' PRICE_CURRENCY
,'X' PRODUCT_PRICE_GROUP
,'X' IMAGES
FROM `e_products` `p`
LEFT JOIN `e_product_to_site` `pts` ON ((`pts`.`PRODUCT_ID`=161))
LEFT JOIN `e_product_articuls` `pa` ON ((`pa`.`PRODUCT_ID`=161))
LEFT JOIN `e_product_stock` `pst` ON ((`pst`.`PRODUCT_ID`=161))
LEFT JOIN `e_product_to_brand` `ptb` ON ((`ptb`.`BRAND_ID`=161))
LEFT JOIN `e_product_to_collection` `pcl` ON ((`pcl`.`PRODUCT_ID` = 161))
LEFT JOIN `e_product_measure` `pm` ON ((`p`.`PRODUCT_MEASURE` = `pm`.`ID`))
LEFT JOIN `e_brands` `b` ON ((`ptb`.`BRAND_ID`=`b`.`ID`))
LEFT JOIN `e_manufactorers` `m` ON ((`b`.`MAN_ID`=`m`.`ID`))
LEFT JOIN `e_collections` `cs` ON ((`cs`.`ID`=`pcl`.`COLLECTION_ID`))
LEFT JOIN `e_product_prices` `pp` ON ((`pp`.`PRODUCT_ID`=`p`.`ID`))
WHERE `p`.`ID` IN (161) AND `pts`.`SITE_ID` LIKE 's0'
UNION
SELECT 'categories',`p`.`ID` AS `ID`
,'X','X','X','X','X','X','X','X','X','X','X','X'
,'X','X','X','X','X','X','X','X','X','X','X'
,`ptc`.`CATEGORY_ID`
,'X','X','X','X','X','X','X'
FROM `e_product_to_category` `ptc`
LEFT JOIN `e_products` `p` ON ((`p`.`ID`=`ptc`.`PRODUCT_ID`))
LEFT JOIN `e_product_categories` `pc` ON ((`pc`.`ID`=`ptc`.`CATEGORY_ID`))
LEFT JOIN `e_catalogs` `c` ON ((`c`.`ID`=`pc`.`CATALOG_ID`))
WHERE `ptc`.`PRODUCT_ID` IN (161)
AND `c`.`SITE_ID` LIKE 's0'
UNION
SELECT 'features',`p`.`ID` AS `ID`
,'X','X','X','X','X','X','X','X','X','X','X','X'
,'X','X','X','X','X','X','X','X','X','X','X'
,'X'
,FEATURE_ID
,'X','X','X','X','X','X'
FROM `e_product_catalog` `pc`
LEFT JOIN `e_products` `p` ON `p`.`ID`=`pc`.`PRODUCT_ID`
LEFT JOIN `e_product_to_category` `ptc` ON ((`ptc`.`PRODUCT_ID`=`pc`.`PRODUCT_ID`))
LEFT JOIN `e_catalogs` `c` ON ((`c`.`ID`=`ptc`.`CATEGORY_ID`))
WHERE `pc`.`PRODUCT_ID` IN (161) AND `c`.`SITE_ID` LIKE 's0'
UNION
SELECT 'rangeapp',`p`.`ID` AS `ID`
,'X','X','X','X','X','X','X','X','X','X','X','X'
,'X','X','X','X','X','X','X','X','X','X','X'
,'X','X'
,`RANGE_APP_ID`
,'X' ,'X','X','X','X'
FROM `e_product_range_app` `pra`
LEFT JOIN `e_products` `p` ON `p`.`ID`=`pra`.`PRODUCT_ID`
WHERE `PRODUCT_ID` IN (161)
UNION
SELECT 'rangepre',`p`.`ID` AS `ID`
,'X','X','X','X','X','X','X','X','X','X','X','X'
,'X','X','X','X','X','X','X','X','X','X','X'
,'X','X','X'
,`RANGE_PRE_ID`,'X','X','X','X'
FROM `e_product_range_pre` `prp`
LEFT JOIN `e_products` `p` ON `p`.`ID`=`prp`.`PRODUCT_ID`
WHERE `PRODUCT_ID` IN (161)
UNION
SELECT 'prices',`p`.`ID` AS `ID`
,'X','X','X','X','X','X','X','X','X','X','X','X'
+152
<?php
/* connect.php - соединение с БД */
include 'connect.php';
?>
Обучал девушку php. Зовет и говорит что сервер не работает... Бедный сервер и вправду показывал что он не работает из следующего кода
−150
print $string =~ /([http|ftp|https]+:\/\/[\w\/\.\?\&\=]+)/;
Типичный индусский регэксп (в данном случае ищет УРЛ в строчке)
−147
if (!@ARGV){
die ("Usage: palindrom.pl word\n");
}
$text = $ARGV[0];
if (length($text) < 4){
die ("Error: Word must be not less than 4 leters\n");
}
if ($text =~ m/(.)(.). ?\2\1/){
print "Result: Match\n";
}
else{
print "Result: Not match\n";
}
Код как-бэ проверяет является ли слово палиндромом.
На самом деле проверяются только первые два символа с начала и конца. То есть строка "alla123h5vj3galla" является палиндромом.
−237.4
print "Content-type: text/plane \n\n";
текст/самолёт
Собсно, тут даже Перл ни при чем, просто улыбнуло...
+149
$pizdeckakoyzaprosische = "SELECT DISTINCT direct_pay.*, t_user.name AS username, kart.nominal, kart.name AS kartname, exemplyar.serial, exemplyar.usdok, exemplyar.balance FROM direct_pay, t_user, t_dealer, kart, exemplyar WHERE direct_pay.id_device = t_user.id AND t_user.id = {$_SESSION['id']} AND exemplyar.id = direct_pay.id_kart AND exemplyar.id_kart = kart.id$sql$stord";
$result = pg_query($dbconnk, $pizdeckakoyzaprosische);
while ($row = pg_fetch_assoc($result)) {
3-4 года назад.. начинал писать платежную систему.. до сих пор знакомый в коде разбирается :)
−83
Select Case LCase(ParamA) 'push eax
Case "eax": hhh = &H50: Put #123, , hhh: GoTo 344
Case "ecx": hhh = &H51: Put #123, , hhh: GoTo 344
Case "edx": hhh = &H52: Put #123, , hhh: GoTo 344
Case "ebx": hhh = &H53: Put #123, , hhh: GoTo 344
Case "esp": hhh = &H54: Put #123, , hhh: GoTo 344
Case "ebp": hhh = &H55: Put #123, , hhh: GoTo 344
Case "esi": hhh = &H56: Put #123, , hhh: GoTo 344
Case "edi": hhh = &H57: Put #123, , hhh: GoTo 344
Case "es": hhh = &H6: Put #123, , hhh
End Select
Не думал, что goto еще пользуются!
+143
$i = (True)?(True?True:False):False;
$i = !$i;
if (($i)?(!$i?$i:!$i):$i) die('Наговнокодить!');
die('Говнокод!');
что выведет скрипт? ))))
+152
function allowCheckout(enable) {
if (enable)
$("#btnMakeOrder").removeAttr("enabled");
else
$("#btnMakeOrder").removeAttr("disabled");
}
Код, который написал бельгийский Software Architect, пришедший из мира C++ говонокодинга.
Дальше будет...