X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=torn.pl;fp=torn;h=a029b560d46e5f51acbd4d17952e81c5cd9d3b87;hb=aaf61acdbaa2b4489317f39012140fa23dda7978;hp=70a82b939d40b114f9a7ece029bf760ef34db756;hpb=e4e1e34145e0c41ffe77e13257528ab284451821;p=torn.git

diff --git a/torn b/torn.pl
similarity index 94%
rename from torn
rename to torn.pl
index 70a82b9..a029b56 100755
--- a/torn
+++ b/torn.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 # torn - Musical files renaming with russian language transliteration
-# Copyright (C) 2007-2023 Sergey Matveev (stargrave@stargrave.org)
+# Copyright (C) 2007-2021 Sergey Matveev (stargrave@stargrave.org)
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -19,9 +19,11 @@
 =head1 DESCRIPTION
 
 This Perl script takes directory file list and renames all files,
-making some substitution changes.  It has some rules for musical
+making some substitution changes. It has some rules for musical
 files and rules to convert russian filenames to translit.
 
+This version is unsupported! Use zsh-based implementation instead.
+
 =head1 USAGE
 
 Simply run this script in directory where you want files and/or