# open (file_read, "input-checkbook.txt");
# becomes
open my $read, '<', $filepath or die "impossible to read from [$filepath]!";

..

close $read;