#!/usr/bin/perl -w

#-----------------------------------------------
# lect13_modules1
#
# ADAPTED FROM "Practical Perl with CGI 
#    Applications", E. Chang, Scott-Jones
#    Publishing, p. 341, Listing 8-3
#
# supposed to "Report on installed modules
#    using ExtUtils::Installed"
#
# modified by: Sharon M. Tuttle
# last modified: 11-16-04
#-----------------------------------------------

#use lib '/d3/home/faculty/st10/perllib/HTML-Template-2.7';


use ExtUtils::Installed;

# note the creation of a new object!

my $installed_modules = ExtUtils::Installed->new();

# print module name and its version (if available)
#    for each installed module

foreach my $module ($installed_modules->modules())
{
    my $version = $installed_modules->version($module)
        || "???";

    print "$module -- $version\n";
}

# end lect13_modules1