Tag Archives: быдлокодеры

и пошли валить лес топором.” Читал код. Много плакал. Потратил много нервных клеток. my $xp = XML::XPath->new(filename => “$SOME_PATH/”.$read_file); my $root = $xp->find(‘/RootNode’); foreach my $node ($root->get_nodelist) { my $file_content = XML::XPath::XMLParser::as_string($node); my @splilt_file = split(/\n/, $file_content); &process_each_line(\@splilt_file); } Для … Continue reading →

int size=0; … fread( &size, sizeof(int), 1, f); while(size–) { … int size=0; … fread( &size, sizeof(int), 1, f); while(size–) {

struct uniqueEPGKey { int sid, onid, tsid; … bool operator==(const uniqueEPGKey &a) const { return !memcmp( &sid, &a.sid, sizeof(int)*3); } Молодцы, блин. Сэкономили полстрочки кода. Upd: “м-мать”, — звонко откликнулось эхо. unsigned int magic=0; fread( &magic, sizeof(int), 1, f); if … Continue reading →

А сегодня ночью один скриптик перловый, запускаемый из крона, не отработал. Бывает. Ну я его перезапустил. А он чего-то думает долго. Минут через десять мне надоело ждать и я посмотрел в код.  А там ТАКОЕ… что прям хоть целиком в … Continue reading →