http://perlmonks.org.ru/vorota_v_perl/%D1%80%D0%B8%D1%813.JPG