Select Code to Download

@array=readpipe 'ls 'directory'/'subdirectory'.*html' ;

sort @array;

@headings=('Title','Issue Date'); 
@rows=th(\@headings); 
...
} 
print 
table({width=>"100%",border=>"1",bordercolor=>"#d9dae6",cellspacing=>"
+1",cellpadding=>"1"},Tr({bgcolor=>"#97a5f0"},\@rows));