#!/usr/bin/perl -w use strict; use warnings; use utf8; use open ':encoding(UTF-8)'; use open ':std'; for my $module ( @ARGV ) { eval "use $module"; if ($@) { print "Modul does not exists" } else { print "$module => ". $module->VERSION . "\n"; } }