Perl view 2