LINUX.ORG.RU

>---------cut--------< my $rpm1 = $download_loc."libIDL-0.8.4-1.i386.rpm"; system("cp $rpm1 ./"); my $rpm2 = $download_loc."ORBit2-2.12.0-3.i386.rpm"; system("cp $rpm2 ./"); my $rpm3 = $download_loc."freetype-2.1.9-5.el4.i386.rpm"; system("cp $rpm3 ./"); my $rpm4 = $download_loc."libjpeg-6b-33.i386.rpm"; system("cp $rpm4 ./"); my $rpm5 = $download_loc."libpng-1.2.7-1.el4.2.i386.rpm"; system("cp $rpm5 ./"); my $rpm6 = $download_loc."libtiff-3.6.1-12.i386.rpm"; system("cp $rpm6 ./"); >---------cut--------<

Убило и порвало. действительно индуссокод...

AiFiLTr0 ★★★★★
()

многа букафф.

перл фтопку (жаль что все системные утилиты в дебиане на переле), чистый баш наше все.

unonimous
()

Самый яркий образец индусокода - Internet Explorer. http://img258.imageshack.us/img258/4651/internetexplorer7authorpf3.jpg

По сабжу - код ужасен. Его надо сохранить для потомков - чтобы неповадно было так быдлокодить. Напоминает те "шедевры", которые ваяли на быдлоделфи некоторые мои сокурсницы для курсовой работы.

blaster999 ★★
()

Первые строки:

#!/usr/bin/perl
...
my $perl = system("perl -version >> dimdimextract.log");
if($perl != 0)
{
system("echo Perl not available in your system");
system("echo Installing perl");
`chmod +x ActivePerl-5.6.1.638-i686-linux.rpm`;
`rpm -ivh ActivePerl-5.6.1.638-i686-linux.rpm`;
}

Это как?

logIN
()

Эт действительно жесть.

Порвала уже вторая строка:

>system("echo

Дальше - веселее

:D

router ★★★★★
()
Ответ на: комментарий от anonymous

>удивительно что со стриктом написано, лол.

Иначе они б затр^Wзамучались ЭТО отлаживать

router ★★★★★
()
Ответ на: комментарий от unonimous

>перл фтопку (жаль что все системные утилиты в дебиане на переле), чистый баш наше все.

так вы код посмотрите, автор тоже так думает :)

а этот код точно в ручную написан?

anonymous
()
Ответ на: комментарий от Muromec

> _это_ надо читать полностью

До появления симптомов красноглазиеса?

anonymous
()
Ответ на: комментарий от anonymous

нед. я этот отжиг в лолксах выкладывал вчера.

Muromec ☆☆
() автор топика

Там сначала ставится Perl из rpm, и только потом проверяется, от рута-ли запущен скрипт. =)

KF
()

Один идиот откопал кусок кода написанный другим идиотом, а затем еще десяток идиотов начали его обсуждать.

Это у вас такой способ самоутверждения?

anonymous
()
Ответ на: комментарий от router

>А проверку на наличие перла робот мог придумать? )))

ну а sub installphp можно в ручную что ли набить?

проверять наличие перла из перла, это слишком хорошо для робота :)

anonymous
()
Ответ на: комментарий от blaster999

>Назвал всех идиотами - почувствовал себя умнее?

Нет. Эта была всего лишь попытка пробудить искру разума у участвующих в полностью бессмысленном обсуждении этого несчастного куска кода. Видимо, неудачная.

anonymous
()
Ответ на: комментарий от anonymous

>откопал кусок кода

если бы я его откапывал.. мне эту фигню установить нужно было :(

Muromec ☆☆
() автор топика
Ответ на: комментарий от anonymous

Почему - бессмысленном? Высмеивание данного шедевра - намёк всем подобным пейсателям, которые могут читать эту тему.

blaster999 ★★
()

Ну, ничё-ничё. Не всем же дано познать искусство написания цикла.

mutronix ★★★★
()
Ответ на: комментарий от blaster999

>Почему - бессмысленном? Высмеивание данного шедевра - намёк всем подобным пейсателям, которые могут читать эту тему.

Я имел в виду несколько другое. Что получают те "пейсатели", которые бросились обсуждать этот хрен знает откуда выкопанный код. Какое-то особое удовлетворение? Уж, явно, это не благородный "намёк всем подобным пейсателям, которые могут читать эту тему".

anonymous
()

Вот, если б обсуждали какого то гомосексуалиста, то просто делом чести было б каждому натуралу написать - "уу, пидор!".

CtrlAltBs
()

> http://dimdim.com/products/idea_behind_dimdim.html

‘Powerful simplicity’ is dimdim’s mantra. dimdim differs from first generation web meeting solutions, as they were exceedingly expensive, notoriously difficult to implement and impossible to customize. dimdim provides a business-class quality web meeting service that is free to consumers and extremely easy to use, as there is no software to download or maintain.

anonymous
()
Ответ на: комментарий от anonymous

> as there is no software to download or maintain.

индусы на лету пишут, в реальном времени? =)

//капча: toplor

anonymous
()

ПОРВАЛО НА КЛОЧКИ!!!!!!!!!! ДРЫГАЮСЬ В КОНВУЛЬСИЯХ!!

А ЭТО ВАЩЕ ПОЛНЫЙ ПИ$ДЕЦ!!!



#!/usr/bin/perl
use strict;
system("echo Starting the main script");
system("echo Checking for perl version");

my $hostedlocation = "./dimdimrepository/";

	my $perl = system("perl -version >> dimdimextract.log");
	if($perl != 0)
	{
		system("echo Perl not available in your system");
		system("echo Installing perl");
		`chmod +x ActivePerl-5.6.1.638-i686-linux.rpm`;
		`rpm -ivh ActivePerl-5.6.1.638-i686-linux.rpm`;
	}
	system("echo Calling Pre-install process for dimdim installation");

vilfred ☆☆
()

чем-то напоминает мою быдлопрограмму накиданную за 5 минут в состоянии полного опьянения, для мониторинга и переподнятия сетевых интерфейсов, эх до сих пор где-то трудится :)

gnomino
()

Не верю, что такие бывают. :)

true
()

я конечно тоже былокодер, но не до такой степени.

mono ★★★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.