Explicitly mention that Perl version is not supported

diff --git a/torn b/torn.pl
similarity index 94%
rename from torn
rename to torn.pl
index 70a82b939d40b114f9a7ece029bf760ef34db756..a029b560d46e5f51acbd4d17952e81c5cd9d3b87 100755 (executable)
--- 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

diff --git a/torn.zsh b/torn.zsh
index 6be9f1395a13f40a5b72d2b56b4103a39e4f8293..11d0fccfdc7920a209876bb21735d8327b5faa37 100755 (executable)
--- a/torn.zsh
+++ b/torn.zsh
@@ -1,5 +1,5 @@
 # torn - Musical files renaming with russian language transliteration
-# Copyright (C) 2007-2023 Sergey Matveev (stargrave@stargrave.org)
+# Copyright (C) 2021-2023 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