$SIG{INT} = sub { warn @_ };