Прикольное объявление :)

Поиск и предложения по работе.
Ответить
Аватара пользователя
Аман Ванкуверский
Маньяк
Сообщения: 2759
Зарегистрирован: 18 окт 2005, 01:10

Прикольное объявление :)

Сообщение Аман Ванкуверский »

CGI & mod_perl programmer

...

#!/usr/bin/perl -w

use Employee qw(:WebProgrammer);
use CGI;
use DBI;

$you = new Employee;
$in = new CGI;
$use_mod_perl = ((exists $ENV{'GATEWAY_INTERFACE'}
and $ENV{'GATEWAY_INTERFACE'} =~ /CGI-Perl/)
or exists $ENV{'MOD_PERL'} );
$os = $in->param('os') || 'Linux' || 'Solaris' || 'BSD';
$knowledge = "/usr/local/lib/required";
open(REQUIRED, "$knowledge");
while (<REQUIRED>) {
next if (/Do not understand this message/);
($apache, $SQL, $HTML, $Javascript) = split;
}
close(REQUIRED)
$knowledge = "/usr/local/lib/helpful";
open(BENEFICIAL, "$knowledge");
$nice_to_have = <BENEFICIAL>;
$nice_to_have =~ m/(sendmail)(MySQL)(Oracle)(DNS\/BIND)(Java)/;
close(BENEFICIAL);

$dbh = DBI->connect('dbi:mysql:TUCOWS','you','hired') || die "can't connect";
$query = "SELECT the_best FROM applicants WHERE experience like 'at least 1-2 year%';
$sth = $dbh->prepare("$query");
$sth->execute;
$sth->finish;
$dbh->disconnect;

if ($interested) {
$email = 'hrdept@tucows.com';
}
Оригинал объявления
AndreyA
Маньяк
Сообщения: 1165
Зарегистрирован: 25 сен 2006, 10:30
Откуда: Burnaby

Сообщение AndreyA »

Так тут даже я все понял :) хотя Perlовые скрипты только от случая к случаю вижу, а уж чтобы самому писать так может пару раз :)
Но написали прикольно!
Аватара пользователя
alpax
Графоман
Сообщения: 10596
Зарегистрирован: 04 мар 2003, 17:39
Откуда: Richmond, BC

Сообщение alpax »

В свое время у EA было объявление типа такого:
char *text = {78,111,119,32,104,105,114,105,110,103};
Аватара пользователя
AlexANB
Маньяк
Сообщения: 2904
Зарегистрирован: 17 фев 2003, 18:47
Откуда: Ontario

Сообщение AlexANB »

alpax писал(а):В свое время у EA было объявление типа такого:
char *text = {78,111,119,32,104,105,114,105,110,103};
Даже не заглядывая в ASCII таблицу уже вижу, что это -- "Now hiring" :)
Аватара пользователя
Gatchinskiy
Комбинатор
Сообщения: 20952
Зарегистрирован: 05 окт 2003, 20:44
Откуда: St. Petersburg(Gatchina) > Vancouver

Сообщение Gatchinskiy »

.... висело долго на терминал авеню ....

Изображение
Аватара пользователя
alpax
Графоман
Сообщения: 10596
Зарегистрирован: 04 мар 2003, 17:39
Откуда: Richmond, BC

Сообщение alpax »

Gatchinskiy писал(а):.... висело долго на терминал авеню ....
Оно!
Ага, нолик я забыл, но циферки до него оказывается запомнил правильно. :)
Аватара пользователя
Аман Ванкуверский
Маньяк
Сообщения: 2759
Зарегистрирован: 18 окт 2005, 01:10

Сообщение Аман Ванкуверский »

Gatchinskiy писал(а):.... висело долго на терминал авеню ....

Изображение
оно самое!
я после того как запостил здесь перловскую объяву, вспомнил про эту рекламу и весь вечер ее искал, но так и не нашел
Аватара пользователя
Gatchinskiy
Комбинатор
Сообщения: 20952
Зарегистрирован: 05 окт 2003, 20:44
Откуда: St. Petersburg(Gatchina) > Vancouver

Сообщение Gatchinskiy »

Аман Ванкуверский писал(а): ... я после того как запостил здесь перловскую объяву, вспомнил про эту рекламу и весь вечер ее искал, но так и не нашел
где искал? ... все под боком ... :)

http://forum.kamorka.com/viewtopic.php?t=1466
Ответить