package NoSigWarn; require Exporter; our @ISA = qw(Exporter); use warnings; no warnings qw(experimental::signatures); use feature qw(signatures); sub import { warnings->import (); warnings->unimport (qw(experimental::signatures)); feature->import ('signatures'); NoSigWarn->export_to_level (1); } 1;