RosettaCodeData/Task/Reflection-Get-source/Perl/reflection-get-source.pl

# 20211213 Perl programming solution

use strict;
use warnings;

use Class::Inspector;

print Class::Inspector->resolved_filename( 'IO::Socket::INET' ), "\n";