# warn.pl
#!/usr/bin/perl

use strict;
use warnings;

warn 'first warn';

use warn;

warn "second warn";