File: time_markdown_pl.pl

package info (click to toggle)
python-markdown2 2.5.4-1
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 6,492 kB
  • sloc: python: 6,201; perl: 1,493; php: 865; makefile: 37
file content (11 lines) | stat: -rwxr-xr-x 240 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
 

use Markdown;

my @text_files = <$ARGV[0]/*.text>;
my $file, $content;
for $file (@text_files) {
    local(*INPUT, $/);
    open (INPUT, $file)     || die "can't open $file: $!";
    $content = <INPUT>;
    Markdown::Markdown($content);
}