- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
import re
brabrebrized = lambda s, repl = r"бр\1": (
re.sub(
"[йцкнгшщзхъфвпрлджчсмтьб]+([аеёиоуыэюя])",
repl,
s,
flags = re.IGNORECASE
)
)
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−2
import re
brabrebrized = lambda s, repl = r"бр\1": (
re.sub(
"[йцкнгшщзхъфвпрлджчсмтьб]+([аеёиоуыэюя])",
repl,
s,
flags = re.IGNORECASE
)
)
Я ебрабрубря и брабрибрал брабрибраброр бребров. брибрер:
брибрит брёбра бра брабробре,
бробрит ябра в абребробре.
брибрия! брибрия!
бря брабрубра брибряя!
+1
public static final int CURENT_MILLENIUM = 2000; //must be changed in year 3000
public int year;
public void setYear(String year) {
if (Integer.valueOf(year) < 100) {
year = String.valueOf(CURENT_MILLENIUM + Integer.valueOf(year)).toString();
}
this.year = Integer.valueOf(year);
}
−2
Хотели бы вы, чтобы прелестница-кудесница засунула вам в попу свою волшебную палочку?
Я прелестница-кудесница, и у меня есть волшебная палочка.
Сим-салапим!
Ахалай-махалай!
Зад подставляй!
Вжжжух!
−2
function inhify(guest, inho = 'inho') {
guest = guest.replace(/[aeiou]$/ig, '');
return guest + inho;
}
function test(guest, guestinho) {
var res = inhify(guest);
if (res !== guestinho) {
console.error(`Expected ${res} to be ${guestinho}`);
} else {
console.log(`${guest} => ${guestinho}`);
}
}
test('guest', 'guestinho');
test('guesto', 'guestinho');
test('bormand', 'bormandinho');
test('barop', 'baropinho');
test('anus', 'anusinho');
test('viagra', 'viagrinho');
test('pohui', 'pohuinho');
0
body {background: url("http://forumfiles.ru/files/0008/ea/f4/23438.jpg") repeat-y scroll center top transparent;}
#logotop {background-image: url("http://forumfiles.ru/files/0008/ea/f4/46264.png"); margin-left: -33px;}
#pun {background-image: url("http://forumfiles.ru/files/0008/ea/f4/21620.jpg");}
.punbb .section .container, .punbb .post-body, .punbb .post-links, .punbb td.tc2, .punbb td.tc3, .punbb .formal fieldset .post-box, #viewprofile li strong, #viewprofile li div, #setmods dd, .punbb .info-box, .punbb #pun-main .info-box .legend {color: #777;}
.punbb .post h3 span, .punbb th, #viewprofile li, #setmods dl {color: #777;}
Северянин
0
Струйкер!
Засунь симо-салапимо в кувшин.
−2
instance Arbitrary ProjectConfig where
arbitrary =
ProjectConfig
<$> (map getPackageLocationString <$> arbitrary)
<*> (map getPackageLocationString <$> arbitrary)
<*> shortListOf 3 arbitrary
<*> arbitrary
<*> arbitrary
<*> arbitrary
<*> arbitrary
<*> arbitrary
<*> arbitrary
<*> (MapMappend . fmap getNonMEmpty . Map.fromList
<$> shortListOf 3 arbitrary)
-- package entries with no content are equivalent to
-- the entry not existing at all, so exclude empty
shrink ProjectConfig { projectPackages = x0
, projectPackagesOptional = x1
, projectPackagesRepo = x2
, projectPackagesNamed = x3
, projectConfigBuildOnly = x4
, projectConfigShared = x5
, projectConfigProvenance = x6
, projectConfigLocalPackages = x7
, projectConfigSpecificPackage = x8
, projectConfigAllPackages = x9 } =
[ ProjectConfig { projectPackages = x0'
, projectPackagesOptional = x1'
, projectPackagesRepo = x2'
, projectPackagesNamed = x3'
, projectConfigBuildOnly = x4'
, projectConfigShared = x5'
, projectConfigProvenance = x6'
, projectConfigLocalPackages = x7'
, projectConfigSpecificPackage = (MapMappend
(fmap getNonMEmpty x8'))
, projectConfigAllPackages = x9' }
| ((x0', x1', x2', x3'), (x4', x5', x6', x7', x8', x9'))
<- shrink ((x0, x1, x2, x3),
(x4, x5, x6, x7, fmap NonMEmpty (getMapMappend x8), x9))
]
В хачкеле мало бойлерплейта, говорили они. Это ещё далеко не самый длинный список, см. x43 ниже.
https://github.com/haskell/cabal/blob/4e0c701a2feb520d369ef506a18288c47f64b06a/cabal-install/tests/UnitTests/Distribution/Client/ProjectConfig.hs
−1
if (isset($_GET['org'])) {
$org=htmlspecialchars($_GET["org"]);
}
else $org=1;
if ($num_resultsdop) {
$sql = "SELECT * FROM `baza`, `sankomerc`, `sandop` WHERE baza.id='$org' and sankomerc.id='$org' and sandop.id='$org'";
}
else {
$sql = "SELECT * FROM `baza`, `sankomerc` WHERE baza.id='$org' and sankomerc.id='$org'";
}
$row = mysql_fetch_array($result);
$chotz=$row['chotz'];
$nazvanie=$row['nazvanie'];
$nazvaniech=$row['nazvanie'];
//типографим название
$typograph->set_text($nazvanie);
$nazvanie = $typograph->apply();
$nazvanienotags = strip_tags($nazvanie);
SEO: #nazvanienotags
SemaReal, помнишь, я тебе говорил, что летом скорее всего перейду на другую работу или восстановлюсь в универе?
Тогда моя претензия была в том, что используют устаревающий Yii2, что нет CI, нет тестов…
После импровизированного отпуска я пришёл, и получил проект, пример реального кода из которого ты видишь.
+1
public static function PhpToJSObject($arData, $bWS = false, $bSkipTilda = false, $bExtType = false)
{
static $use_bx_encode = null;
if (!isset($use_bx_encode))
$use_bx_encode = function_exists('bx_js_encode');
if ($use_bx_encode)
return bx_js_encode($arData, $bWS, $bSkipTilda, $bExtType);
switch(gettype($arData))
{
case "string":
if(preg_match("#['\"\\n\\r<\\\\\x80]#", $arData))
return "'".CUtil::JSEscape($arData)."'";
else
return "'".$arData."'";
case "array":
$i = -1;
$j = -1;
foreach($arData as $j => $temp)
{
$i++;
if ($j !== $i)
break;
}
if($j === $i)
{
$res = '[';
$first = true;
foreach($arData as $key => $value)
{
if($first)
$first = false;
else
$res .= ',';
switch(gettype($value))
{
case "string":
if(preg_match("#['\"\\n\\r<\\\\\x80]#", $value))
$res .= "'".CUtil::JSEscape($value)."'";
else
$res .= "'".$value."'";
break;
case "array":
$res .= CUtil::PhpToJSObject($value, $bWS, $bSkipTilda, $bExtType);
break;
case "boolean":
if($value === true)
$res .= 'true';
else
$res .= 'false';
break;
case "integer":
case "double":
if ($bExtType)
$res .= $value;
else
$res .= "'".$value."'";
break;
default:
if(preg_match("#['\"\\n\\r<\\\\\x80]#", $value))
$res .= "'".CUtil::JSEscape($value)."'";
else
$res .= "'".$value."'";
break;
}
}
$res .= ']';
return $res;
}
$sWS = ','.($bWS ? "\n" : '');
$res = ($bWS ? "\n" : '').'{';
$first = true;
foreach($arData as $key => $value)
{
if ($bSkipTilda && substr($key, 0, 1) == '~')
continue;
if($first)
$first = false;
else
$res .= $sWS;
if(preg_match("#['\"\\n\\r<\\\\\x80]#", $key))
$res .= "'".CUtil::JSEscape($key)."':";
else
$res .= "'".$key."':";
switch(gettype($value))
{
case "string":
if(preg_match("#['\"\\n\\r<\\\\\x80]#", $value))
$res .= "'".CUtil::JSEscape($value)."'";
else
$res .= "'".$value."'";
break;
case "array":
$res .= CUtil::PhpToJSObject($value, $bWS, $bSkipTilda, $bExtType);
В ядре битрикса в файле bitrix/modules/main/tools.php на 4613 строке, длинной в 141 строку (жаль здесь ограничение на 100 строк), есть замечательный метод который по сути почти повторяет json_encode().
Почти - это потому, что это говно генерит невалидный json (использует одинарные ковычки), да еще не учитывает типы (true превратится в строку 'true').
Битриксоиды этим подосрали даже не веб-студиям, они просто нагенерировали себе много дополнительной работы на долгое время вперед.
Желаю им держать эту планку, и никогда не расти.
0
void check_manifest_line (int p) {
static char c[MAX_LINE_LEN + 1];
int l = p - START_MANIFEST_POSITION;
if (l <= MAX_LINE_LEN && l > 4) {
get_binlog_data (c, START_MANIFEST_POSITION, l);
c[l] = 0;
char *pp = c;
int op = -1;
if (l >= 6 && !memcmp (c, "start", 5)) {
op = 1;
pp += 5;
} else if (l >= 5 && !memcmp (c, "stop", 4)) {
op = 2;
pp += 4;
} else if (l >= 8 && !memcmp (c, "version", 7)) {
op = 3;
pp += 7;
}
if (is_whitespace (*pp) && op > 0) {
pp ++;
pp = eat_whitespace (pp);
if (!*pp) {
START_MANIFEST_POSITION = p + 1;
return;
}
if (op == 1 || op == 2) {
char *rr = pp;
pp = eat_not_whitespace (pp);
char *zz = pp;
pp = eat_whitespace (pp);
*zz = 0;
if (pp == c + l && zz - rr > 0) {
struct cluster *C = CC;
int x = BINLOG_NAME_LEN - 1;
while (x >= 0 && BINLOG_NAME[x] != '/') {
x--;
}
add_cluster (BINLOG_NAME, x + 1, rr, (MAIN_REPLICA ? 2 : 0) + (op == 2 ? 4 : 0) + (1 << 30));
CC = C;
}
} else {
assert (op == 3);
char *rr = pp;
pp = eat_not_whitespace (pp);
char *rr_end = pp;
pp = eat_whitespace (pp);
*rr_end = 0;
if (!*pp) {
START_MANIFEST_POSITION = p + 1;
return;
}
int version = atoi (pp);
pp = eat_not_whitespace (pp);
pp = eat_whitespace (pp);
if (!*pp) {
START_MANIFEST_POSITION = p + 1;
return;
}
long long size = atoll (pp);
pp = eat_not_whitespace (pp);
pp = eat_whitespace (pp);
if (pp == c + l && rr_end > rr && version > 0 && size >= 0) {
struct cluster *C = CC;
int x = BINLOG_NAME_LEN - 1;
while (x >= 0 && BINLOG_NAME[x] != '/') {
x --;
}
int rrlen = rr_end - rr;
int i;
for (i = 0; i < max_cluster; i++) if (Clusters[i]) {
//fprintf (stderr, "i = %d, binlog_name = %s, rr = %s, rrlen = %d\n", i, Clusters[i]->binlog_name, rr, rrlen);
const char *s = Clusters[i]->binlog_name;
int l = strlen (Clusters[i]->binlog_name) - 1;
while (l >= 0 && s[l] != '/') { l --; }
s = s + l + 1;
if (!memcmp (s, rr, rrlen) && s[rrlen] == '.') {
int old = atoi (s + rrlen + 1);
if (old >= version) {
vkprintf (0, "New version %d, old %d. Skipping\n", version, old);
START_MANIFEST_POSITION = p + 1;
return;
}
if (unlink (Clusters[i]->binlog_name) < 0) {
fprintf (stderr, "Can not delete old file %s: %m\n", Clusters[i]->binlog_name);
}
delete_cluster (i);
}
}
static char name[1024];
memcpy (name, rr, rrlen);
name[rrlen] = '.';
sprintf (name + rrlen + 1, "%06d", version);
add_cluster (BINLOG_NAME, x + 1, name, (MAIN_REPLICA ? 2 : 0) + (1 << 30));
LAST_SIZE = size;
CC = C;
}
}
}
}
START_MANIFEST_POSITION = p + 1;
https://github.com/vk-com/kphp-kdb/blob/ce6dead5b3345f4b38487cc9e45d55ced3dd7139/copyfast/copyfast-engine.c#L1081-L1181