Help for this page

Select Code to Download


  1. or download this
    ...
Name=foo
Icon=bar
Categories=a;b;c
...
  2. or download this
    #!/usr/bin/perl -w
use strict;
...
    my $val = qq#prog "$collect{name}" $collect{icon} $collect{exec}#;

### More code follows
  3. or download this
    # 'categories' entry is 'GNOME;Games;Action'
push $out{GNOME}{Games}{Action}, $val;
# 'GNOME;Games;Action;FPS'
push $out{GNOME}{Games}{Action}{FPS}, $val;
# ...and so on.
  4. or download this
        my @levels = split /;/, $collect{categories};
    for (0 .. $#levels) {
...

use Data::Dumper;
print Dumper($out);