sub foo ($filter, @inputs) {
    print $filter->($_) foreach @inputs;
}