my $fh = open_file("<", $file, $verbose);
    my $class;
    eval do { local $/; <$fh> };
    die $@ if $@;

    close $fh;
    return $class;