#!/usr/bin/perl
## no critic
open(FH, $f);