foreach my $markdown_filename(@sources) { my $text = ''; open(SOURCE, "<$markdown_filename"); while() { $text .= eval('"' . $_ . '"'); } close(SOURCE); print $text; } #### use warnings; no warnings 'once';