When you post a message like this, do NOT say "it doesn't work". Instead, show what you tried, what you got, and what you wanted. Use copy/paste rather than typing from memory.

eg:

I tried the code

use warnings;
use strict;
print "$0";
[download]

the results I got were just

test.pl
[download]

But I was hoping to get something more like "perl test.pl" printed out.