7 lines
103 B
Perl
7 lines
103 B
Perl
|
# catch an exception and show it
|
||
|
|
try {
|
||
|
|
die "this could go wrong mightily";
|
||
|
|
} catch {
|
||
|
|
print;
|
||
|
|
};
|