#!/usr/bin/env perl
use strict;
use warnings;

warn "foo";
warn "bar\n";


##</code><code>##

$ perl warns.pl
foo at warns.pl line 5.
bar
$