You should try and call the sub from your mod.pl script

mod.pl
#!/usr/bin/perl
use warnings;
use strict;
use TestPrint qw(test_print);

test_print();
[download]

The result of running mod.pl will be the output "hello world" on STDOUT
Hope this helps