aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xponysaylist.pl4
1 files changed, 4 insertions, 0 deletions
diff --git a/ponysaylist.pl b/ponysaylist.pl
index 7a09376..72c0a92 100755
--- a/ponysaylist.pl
+++ b/ponysaylist.pl
@@ -15,6 +15,10 @@ $maxw = 1;
foreach $arg (@ARGV)
{
+ # Format names from ponyies names
+ $arg =~ s/([a-z])([A-Z])/\1 \2/;
+ $arg =~ s/_(.*)/\t(\1)/;
+
if ($first == 1)
{ $first = 0;
$scrw = $arg;