По сабжу - код ужасен. Его надо сохранить для потомков - чтобы неповадно было так быдлокодить. Напоминает те "шедевры", которые ваяли на быдлоделфи некоторые мои сокурсницы для курсовой работы.
Нет. Эта была всего лишь попытка пробудить искру разума у участвующих в полностью бессмысленном обсуждении этого несчастного куска кода. Видимо, неудачная.
>Почему - бессмысленном? Высмеивание данного шедевра - намёк всем подобным пейсателям, которые могут читать эту тему.
Я имел в виду несколько другое. Что получают те "пейсатели", которые бросились обсуждать этот хрен знает откуда выкопанный код. Какое-то особое удовлетворение? Уж, явно, это не благородный "намёк всем подобным пейсателям, которые могут читать эту тему".
‘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.
ПОРВАЛО НА КЛОЧКИ!!!!!!!!!! ДРЫГАЮСЬ В КОНВУЛЬСИЯХ!!
А ЭТО ВАЩЕ ПОЛНЫЙ ПИ$ДЕЦ!!!
#!/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");
чем-то напоминает мою быдлопрограмму накиданную за 5 минут в состоянии полного опьянения, для мониторинга и переподнятия сетевых интерфейсов, эх до сих пор где-то трудится :)