|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
It may be used to get a list of all available FVWM commands including the command name, its short description and some other command properties.
use lib `fvwm-perllib dir`;
use FVWM::Commands;
use POSIX;
my $date = strftime("%d-%b-%Y", gmtime($FVWM::Commands::TIME));
my $version = $FVWM::Commands::VERS;
print "The recognized commands for fvwm $version as of $date:\n\n";
foreach my $command (@FVWM::Commands::LIST) {
printf " %-21s - %s\n", $command->{name}, $command->{descr};
}
Example:
print "The FVWM command list found on your system was generated "
. (time() - $FVWM::Commands::TIME) / 86400 . " days ago\n";
name may be special, like ``+'', ``#'' and ``*''. Other names usually contain only isalpha characters, like Move, SendToModule.
cursor may be either empty or the cursor context used in CursorStyle (like ``SELECT'' or ``MOVE''), associated with the command.
descr is a short one line description of the command.
window is true for commands that need a window.
Example:
# get command names only
@commandNames = map { $_->{name} } @FVWM::Commands::LIST;
Last modified on August 26, 2005