require Class::Inspector;
my $file = Class::Inspector->resolved_filename($ARGV[0]);
unless ($file) {
    warn "not found\n";
    exit (1);
}
print $file;