Report question

Question: How do I get the dirname of a file with Perl?