Shameless plug of Tk::Carp.

use Tk::Carp qw/tkdie/;

chomp(my $TEST = qx (read_apt _test_setup));
my $PATH = "/opt/adacs/test/$TEST/.saved_poins";

open RF, $PATH or tkdie "File failed to open!";
[download]

bbfu
Black flowers blossom
Fearless on my breath