You can always use die with an optional message if you just want to end the program and report the line number.

#! /usr/bin/perl -w

use strict;
use warnings;

print "The end is nigh!\n";

die "Arrrrrgh!";
__END__
The end is nigh!
Arrrrrgh! at C:\Daniel\perl\PerlMonks\death.pl line 8.
[download]

This is the usual thing to do if you want to exit following a failed test. E.g.

open FILE, "no_such_file" or die $!;
[download]