Maybe someone can improve it.
Code:
#! /usr/bin/env perl
################################################################################
use warnings;
use diagnostics;
################################################################################
@sys = qw
{
textproc/docproj-nojadetex
ports-mgmt/portmaster
};
@x = qw
{
x11-drivers/xorg-drivers
};
@gnome = qw
{
x11/gnome-applets
audio/gnome-media
deskutils/gnome-utils
graphics/eog
graphics/evince
x11/gnome-terminal
x11/gnome-session
x11-fm/nautilus
x11-themes/gnome-themes
sysutils/gconf-editor
sysutils/gnome-control-center
x11/gdm
};
@net = qw
{
ftp/gftp
www/firefox36
irc/irssi
mail/mutt
mail/fetchmail
mail/procmail
mail/msmtp
};
@multimedia = qw
{
multimedia/mplayer
multimedia/audacious-plugins
multimedia/audacious
};
@dev = qw
{
editors/vim
devel/cscope/
devel/cmake
devel/llvm
};
@tex = qw
{
print/teTeX-base
print/latex-pgf
};
@math = qw
{
math/octave
math/R
math/gnuplot
};
@others = qw
{
databases/postgresql90-server
security/gnupg
security/pinentry-curses
textproc/stardict3
};
################################################################################
@total = (@sys, @x, @gnome, @net, @multimedia, @dev, @tex, @math, @others);
$prefix = "/usr/ports/";
foreach $port (@total)
{
system("cd $prefix$port; make showconfig");
}
################################################################################