my $v1 = vector(1,2,3,4,5); my @filter = qw(1 0 0 1 1); my $cv = computed($v1); $cv->set_filter(@filter);