Language Basics Perl

  1. Home
  2. Perl
  3. Language Basics
  4. Capturing fatal errors
#!usr/bin/perl
use warnings;
use strict;
my $line = "25 / 0";
eval ( $line ); 
print "There is an error:\n" if $@;
print $@;