It all seems to work:

do "q.pl";  # prints module
[download]

./q.pl # prints script

# q.pl
if (__FILE__ eq $0) {
    print "script\n";
} else {
    print "module\n";
}
[download]