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