$ perl -MO=Deparse,-p -e 'use if 1==1, warnings => ()'
use if (1, 'warnings', ());
-e syntax OK
$ perl -Mstrict -E 'use if (1, "warnings", ()); my $x; say $x+1'
Use of uninitialized value $x in addition (+) at -e line 1.
1