1#! /usr/bin/perl -w
2# MD5: 595788d5a684ee27601c78ad58547ae4
3# TEST: ./rwbag --sip-packets=stdout --sip-bytes=/dev/null ../../tests/data.rwf | ./rwbagcat
4
5use strict;
6use SiLKTests;
7
8my $rwbag = check_silk_app('rwbag');
9my $rwbagcat = check_silk_app('rwbagcat');
10my %file;
11$file{data} = get_data_or_exit77('data');
12my $cmd = "$rwbag --sip-packets=stdout --sip-bytes=/dev/null $file{data} | $rwbagcat";
13my $md5 = "595788d5a684ee27601c78ad58547ae4";
14
15check_md5_output($md5, $cmd);
16