my $active=shift; return unless $active;