diff options
Diffstat (limited to 'makedocs.pl')
-rw-r--r-- | makedocs.pl | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/makedocs.pl b/makedocs.pl deleted file mode 100644 index 295e1d9..0000000 --- a/makedocs.pl +++ /dev/null @@ -1,19 +0,0 @@ -use strict; - -my $str = ''; -my $regex = qr/(<[^\/].*?>.*?<\/.*?>\n?)|(<\/div>)|(<\/p>)/msp; -my $subst = ''; - - -local $/=undef; -open FILE, '<', 'README.md' or die "Can't open file $!"; -my $file_content = <FILE>; -close FILE; -#print "Source: $file_content\n"; -my $result = $file_content =~ s/$regex//rg; - -my $regex2 = qr/\n[ \n]{3,}\n/msp; -$result = $result =~ s/$regex2/\n\n/rg; - -#print "The result of the substitution is: $result\n"; -print "$result\n"; |