$ cat myscript.pl
#!/usr/bin/perl -wT
use strict;
my $word = defined($_=shift) ? $_ : die "usage: $0 <word>\n"; 
chomp($word);

sub spelled {
        my $word = shift;
        my $out=`spelled $word`;
        print "$out\n";
}

spelled ($word);
$ ./myscript.pl atomic bombs
Insecure dependency in `` while running with -T switch at ./myscript.pl line 8.