in reply to Re^2: pod2usage question
in thread pod2usage question

Which is what I expected, while on a Linux machine, I only get the I am here!...
Odd, works just fine for me. Maybe you should try running it in the debugger. Since the relevant code is in a BEGIN block, you need to put
BEGIN { $DB::single = 1; ...
in there to make sure the debugger doesn't just jump over it. Then, call
$ perl -d move_data.pl
from the command line and step through the source lines using n and s.