Select Code to Download

pyx xcard.xml | perl -nle '/^\((\S+)/ && print $1' | sort -u

#!/usr/bin/perl -w

...
    my @tags = sort keys %{ $self->{tag} || {} };
    return \@tags;
}