$i++ and warn;

##</code><code>##

$i++ and printf "this is line %s\n", __LINE__;
# or..
$i++ and print "this is line ". __LINE__ . "\n";

##</code><code>##

$i++ and line();

sub line { printf STDERR "now executing line %s\n", (caller)[2] }