pyx 'bigXMLfile.xml | perl -n -e '$nb{$1}++ if( m/\A\((.*)\n/); \
                            END { map { print "$_ used $nb{$_} time(s)\n";} sort keys %nb;}'