1#!/usr/bin/perl
2
3# Sort.pm, distributed as part of Snortsnarf v021111.1
4# Author: James Hoagland, Silicon Defense (hoagland@SiliconDefense.com)
5# copyright (c) 2001 by Silicon Defense (http://www.silicondefense.com/)
6# Released under GNU General Public License, see the COPYING file included
7# with the distribution or http://www.silicondefense.com/software/snortsnarf/
8# for details.
9
10# This file is a package holding an instance of some common sorters.
11
12# Please send complaints, kudos, and especially improvements and bugfixes to
13# hoagland@SiliconDefense.com.  As described in GNU General Public License, no
14# warranty is expressed for this program.
15
16package Sort;
17use BasicSorters;
18
19sub BEGIN {
20    $bytime= NumFieldSorter->new('utime');
21    $byhighestanom= NumHighestPktFieldSorter->new('anom');
22    $bypkt1time= FirstPktFieldNumSorter->new('utime',NumFieldPktSorter->new('utime'));
23}
24
251;
26