#!/usr/bin/perl use strict; use warnings; use autodie; open my $input_fh, '<', $ARGV[0]; my @xml_paths = <$input_fh>; close $input_fh;