[Moscow.pm] вакансия Senior Web developer

[Павел Купцов]

Уф.. ну наспамили - пришел - смотрю 29 сообщений с листа пришло :)..
Все же про ноль, я бы доказал так:

#!/usr/bin/perl -w

use strict;
use warnings;
use diagnostics;

my $var1 = 1;
my $var0 = 0;

eval { print $var1/$var0; };

if($@) {
	print "Делить нельзя - доказано Perl";
}
	else { print "Делить можно!";
}

если без eval то получим от диагностики:

Illegal division by zero at todo1.pl line 10 (#1)
    (F) You tried to divide a number by 0.  Either something was wrong in
    your logic, or you need to put a conditional in to guard against
    meaningless input.

Что тут еще доказывать? ;-)


> P.P.S Java , perl , и иже с ним вместе - что-то тут не так )
Многорукий шива им нужен. Кстати - забыли про Photoshop написать, а ведь это
уже классика.