]>
git.ipfire.org Git - thirdparty/openssl.git/blob - util/arx.pl
3 # Simple perl script to wrap round "ar" program and exclude any
4 # object files in the environment variable EXCL_OBJ
6 map { s/^.*\/([^\/]*)$/$1/ ; $EXCL{$_} = 1} split(' ', $ENV{EXCL_OBJ
});
9 #print STDERR "Excluding: @ks \n";
11 my @ARGS = grep { !exists $EXCL{$_} } @ARGV;