Skip to content
This repository has been archived by the owner on Feb 28, 2023. It is now read-only.

Commit

Permalink
Create strip.pl
Browse files Browse the repository at this point in the history
  • Loading branch information
@kspalaiologos
kspalaiologos committed Oct 2, 2019
1 parent 0e2ac59 commit dc2163e
Showing 1 changed file with 10 additions and 0 deletions.
10 changes: 10 additions & 0 deletions strip.pl
View file
@@ -0,0 +1,10 @@
#!/usr/bin/perl

$_ = do { local $/; <> };
s/[\n\r\t ]+//g;
s/<>//g;
s/><//g;
s/\+-//g;
s/-\+//g;
s/[^\+\-\<\>\[\]\,\.]+//g;
print;

0 comments on commit dc2163e

Please sign in to comment.