Задач реально дофига, с меня 10 потов сошло,
пока их все придумал.
Так зачем трудиться, миша, надо постоянно совершенствоваться, изучать новое. Вы же сами говорили.

Ну и как с тобой связаться в Аду? Это Сын Боба.

Простите меня быдло, но что такое за оператор ~~?

http://www.perlmonks.org/index.pl?parent=672056;node_id=3333

Cutnpaste nakurochil, but here:

Are you trying to use Perl 5.10 and the smart match operator? Here's the solution written with named captures, the nifty new 5.10 features that mean you never have to think about $1, $2, and so on. The names become keys in the new hash %+, and the matched text are the values:

#!/usr/local/bin/perl5.10.0 use 5.010; my $text = "Grand Canyon 70%"; $text ~~ / (? .*\S ) \s+ (? \d\d% ) /x; use Data::Dumper; print Dumper( \%+ )
[download]

The output automatically labels your values:

$VAR1 = { 'percent' => '70%', 'name' => 'Grand Canyon' };
[download]

Here's the boring Perl 5.8 way:

#!/usr/bin/perl my $text = "Grand Canyon 70%"; $text =~ / ( .*\S ) \s+ ( \d\d% ) /x; print <<"HERE"; 1: $1 2: $2 HERE

Добро пожаловать в наш Ад!

а ответы к листочкам по теории меры где-нибудь можно увидеть?

а что вы будете делать у нас в Аду?
будете где-то выступать с докладом?

я просмотрел текущие семинары и выступления на math.tau.ac.il, но что-то вас не нашёл. плохо искал?