1#! /usr/bin/perl -w 2# MD5: c7fb877936559e945a9c8504d263db92 3# TEST: echo 10.4.0.0/14 | ../rwset/rwsetbuild | ./rwbagtool --complement-intersect=- ../../tests/bag2-v4.bag | ./rwbagcat 4 5use strict; 6use SiLKTests; 7 8my $rwbagtool = check_silk_app('rwbagtool'); 9my $rwsetbuild = check_silk_app('rwsetbuild'); 10my $rwbagcat = check_silk_app('rwbagcat'); 11my %file; 12$file{v4bag2} = get_data_or_exit77('v4bag2'); 13my $cmd = "echo 10.4.0.0/14 | $rwsetbuild | $rwbagtool --complement-intersect=- $file{v4bag2} | $rwbagcat"; 14my $md5 = "c7fb877936559e945a9c8504d263db92"; 15 16check_md5_output($md5, $cmd); 17