perl(): actual removal 91/20591/4
Samuel GOUGEON [Mon, 29 Oct 2018 19:08:03 +0000 (20:08 +0100)]
  http://bugzilla.scilab.org/12012

  * On Windows, perl.exe is already removed from /tools/Perl in 6.0.1,
     making perl() useless.
  * DeprecatedChecker.cpp is already OK.

Change-Id: I3f24992cdcdcf3bb8a29df16a027d9dce4a395fb

25 files changed:
scilab/CHANGES.md
scilab/modules/core/help/en_US/perl.xml [deleted file]
scilab/modules/core/help/fr_FR/perl.xml [deleted file]
scilab/modules/core/help/ja_JP/perl.xml [deleted file]
scilab/modules/core/help/pt_BR/perl.xml [deleted file]
scilab/modules/core/help/ru_RU/perl.xml [deleted file]
scilab/modules/core/locales/ca_ES.po
scilab/modules/core/locales/core.pot
scilab/modules/core/locales/cs_CZ.po
scilab/modules/core/locales/de_DE.po
scilab/modules/core/locales/es_ES.po
scilab/modules/core/locales/fr_FR.po
scilab/modules/core/locales/it_IT.po
scilab/modules/core/locales/ja_JP.po
scilab/modules/core/locales/pl_PL.po
scilab/modules/core/locales/pt_BR.po
scilab/modules/core/locales/ru_RU.po
scilab/modules/core/locales/uk_UA.po
scilab/modules/core/locales/zh_CN.po
scilab/modules/core/locales/zh_TW.po
scilab/modules/core/macros/perl.sci [deleted file]
scilab/modules/core/tests/nonreg_tests/bug_9200.tst [deleted file]
scilab/modules/helptools/data/configuration/scilab_macros.txt
scilab/tools/Perl/Readme.txt [deleted file]
scilab/tools/tools.iss

index 10ac5fa..018e956 100644 (file)
@@ -391,6 +391,7 @@ Removed Functions
 * `readgateway` has been removed.
 * `fort` has been removed. Please use `call` instead.
 * `mtlb_mode` has been removed. Please use `oldEmptyBehavior` instead.
+* `perl` was obsolete since Scilab 5.5.0. It is removed.
 
 
 Known issues
diff --git a/scilab/modules/core/help/en_US/perl.xml b/scilab/modules/core/help/en_US/perl.xml
deleted file mode 100644 (file)
index 2625f5b..0000000
+++ /dev/null
@@ -1,49 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" xmlns:scilab="http://www.scilab.org" xml:lang="en" xml:id="perl">
-    <refnamediv>
-        <refname>perl</refname>
-        <refpurpose>Call Perl script using appropriate operating
-            system executable. <emphasis role="bold">This function is obsolete.</emphasis>
-        </refpurpose>
-    </refnamediv>
-    <refsynopsisdiv>
-        <title>Syntax</title>
-        <synopsis>perl('perlfile')
-            perl('perlfile',arg1,arg2,...)
-            result = perl(...)
-        </synopsis>
-    </refsynopsisdiv>
-    <refsection>
-        <title>Description</title>
-        <para>
-            <literal>perl('perlfile')</literal> calls the Perl script <literal>perlfile</literal>, using
-            the appropriate operating system Perl executable.
-        </para>
-        <para>
-            <literal>perl('perlfile',arg1,arg2,...)</literal> calls the Perl script perlfile, using
-            the appropriate operating system Perl executable, and passes the arguments
-            <literal>arg1</literal>, <literal>arg2</literal>, and so on, to <literal>perlfile</literal>.
-        </para>
-        <para>
-            <literal>result = perl(...)</literal> returns the results of attempted Perl call to
-            <literal>result</literal>.
-        </para>
-    </refsection>
-    <refsection role="see also">
-        <title>See also</title>
-        <simplelist type="inline">
-            <member>
-                <link linkend="unix">unix</link>
-            </member>
-        </simplelist>
-    </refsection>
-    <refsection>
-        <title>History</title>
-        <revhistory>
-            <revision>
-                <revnumber>5.5.0</revnumber>
-                <revremark>Tagged as obsolete. Will be removed in Scilab 6.0.0.</revremark>
-            </revision>
-        </revhistory>
-    </refsection>
-</refentry>
diff --git a/scilab/modules/core/help/fr_FR/perl.xml b/scilab/modules/core/help/fr_FR/perl.xml
deleted file mode 100644 (file)
index 9ac4d90..0000000
+++ /dev/null
@@ -1,41 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" xmlns:scilab="http://www.scilab.org" xml:lang="fr" xml:id="perl">
-    <refnamediv>
-        <refname>perl</refname>
-        <refpurpose>
-            execute le script Perl. <emphasis role="bold">Cette fonction est obsolète.</emphasis>
-        </refpurpose>
-    </refnamediv>
-    <refsynopsisdiv>
-        <title>Séquence d'appel</title>
-        <synopsis>perl('perlfile')
-            perl('perlfile',arg1,arg2,...)
-            result = perl(...)
-        </synopsis>
-    </refsynopsisdiv>
-    <refsection>
-        <title>Description</title>
-        <para>perl('perlfile') appelle le script Perl perlfile.</para>
-        <para>perl('perlfile',arg1,arg2,...) appelle le script Perl perlfile et passe
-            les arguments arg1, arg2, ..., à perlfile.
-        </para>
-        <para>result = perl(...) retourne le resultat du script Perl.</para>
-    </refsection>
-    <refsection role="see also">
-        <title>Voir aussi</title>
-        <simplelist type="inline">
-            <member>
-                <link linkend="unix">unix</link>
-            </member>
-        </simplelist>
-    </refsection>
-    <refsection>
-        <title>Historique</title>
-        <revhistory>
-            <revision>
-                <revnumber>5.5.0</revnumber>
-                <revremark>Indiquée comme obsolète. Sera supprimée dans Scilab 6.0.0.</revremark>
-            </revision>
-        </revhistory>
-    </refsection>
-</refentry>
diff --git a/scilab/modules/core/help/ja_JP/perl.xml b/scilab/modules/core/help/ja_JP/perl.xml
deleted file mode 100644 (file)
index c919b57..0000000
+++ /dev/null
@@ -1,109 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-
-<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" xmlns:scilab="http://www.scilab.org" xml:lang="ja" xml:id="perl">
-
-    <refnamediv>
-
-        <refname>perl</refname>
-
-        <refpurpose>
-
-            適当なオペレーティングシステムの実行ファイルにより
-
-            Perl スクリプトをコール
-
-            <emphasis role="bold">この関数は廃止されます.</emphasis>
-
-        </refpurpose>
-
-    </refnamediv>
-
-    <refsynopsisdiv>
-
-        <title>Syntax</title>
-
-        <synopsis>perl('perlfile')
-
-            perl('perlfile',arg1,arg2,...)
-
-            result = perl(...)
-
-        </synopsis>
-
-    </refsynopsisdiv>
-
-    <refsection>
-
-        <title>説明</title>
-
-        <para>
-
-            <literal>perl('perlfile')</literal> は,
-
-            適当なオペレーティングシステムの実行ファイルを使用して
-
-            Perlスクリプト<literal>perlfile</literal>をコールします.
-
-        </para>
-
-        <para>
-
-            <literal>perl('perlfile',arg1,arg2,...)</literal>は Perlスクリプト
-
-            <literal>perlfile</literal> を
-
-            適当なオペレーティングシステムの実行ファイルを使用してコールし,
-
-            引数として <literal>arg1</literal>, <literal>arg2</literal>, ... を渡します.
-
-        </para>
-
-        <para>
-
-            <literal>result = perl(...)</literal>
-
-            は実行したPerlコールの結果を <literal>result</literal> に返します.
-
-        </para>
-
-    </refsection>
-
-    <refsection role="see also">
-
-        <title>参照</title>
-
-        <simplelist type="inline">
-
-            <member>
-
-                <link linkend="unix">unix</link>
-
-            </member>
-
-        </simplelist>
-
-    </refsection>
-
-    <refsection>
-
-        <title>履歴</title>
-
-        <revhistory>
-
-            <revision>
-
-                <revnumber>5.5.0</revnumber>
-
-                <revremark>Tagged が廃止予定となりました.
-
-                    Scilab 6.0.0で削除されます.
-                </revremark>
-
-            </revision>
-
-        </revhistory>
-
-    </refsection>
-
-</refentry>
-
diff --git a/scilab/modules/core/help/pt_BR/perl.xml b/scilab/modules/core/help/pt_BR/perl.xml
deleted file mode 100644 (file)
index f9248ea..0000000
+++ /dev/null
@@ -1,37 +0,0 @@
-<?xml version="1.0" encoding="ISO-8859-1"?>
-<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:ns4="http://www.w3.org/1999/xhtml" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" xmlns:scilab="http://www.scilab.org" xml:id="perl" xml:lang="pt">
-    <refnamediv>
-        <refname>perl</refname>
-        <refpurpose>chama script Perl utilizando um executável apropriado do
-            sistema operacional
-        </refpurpose>
-    </refnamediv>
-    <refsynopsisdiv>
-        <title>Seqüência de Chamamento</title>
-        <synopsis>perl('perlfile')
-            perl('perlfile',arg1,arg2,...)
-            result = perl(...)
-        </synopsis>
-    </refsynopsisdiv>
-    <refsection>
-        <title>Descrição</title>
-        <para>perl('perlfile') chama o script Perl 'perlfile', utilizando o
-            executável Perl apropriado do sistema operacional.
-        </para>
-        <para>perl('perlfile',arg1,arg2,...) chama o script Perl 'perlfile',
-            utilizando o executável Perl apropriado do sistema operacional, e passa os
-            argumentos arg1, arg2, e assim por diante, a 'perlfile'.
-        </para>
-        <para>result = perl(...) retorna os resultados de uma chamada a Perl
-            tentada para 'result'.
-        </para>
-    </refsection>
-    <refsection role="see also">
-        <title>Ver Também</title>
-        <simplelist type="inline">
-            <member>
-                <link linkend="unix">unix</link>
-            </member>
-        </simplelist>
-    </refsection>
-</refentry>
diff --git a/scilab/modules/core/help/ru_RU/perl.xml b/scilab/modules/core/help/ru_RU/perl.xml
deleted file mode 100644 (file)
index 2c71009..0000000
+++ /dev/null
@@ -1,40 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" xmlns:scilab="http://www.scilab.org" xml:lang="ru" xml:id="perl">
-    <refnamediv>
-        <refname>perl</refname>
-        <refpurpose>
-            Вызов скрипта Perl, используя соответствующую команду операционной системы
-        </refpurpose>
-    </refnamediv>
-    <refsynopsisdiv>
-        <title>Синтаксис</title>
-        <synopsis>perl('perlfile')
-            perl('perlfile',arg1,arg2,...)
-            result = perl(...)
-        </synopsis>
-    </refsynopsisdiv>
-    <refsection>
-        <title>Описание</title>
-        <para>
-            <literal>perl('perlfile')</literal> вызывает Perl-скрипт <literal>perlfile</literal>, с помощью соответствующей команды операционной системы.
-        </para>
-        <para>
-            <literal>perl('perlfile',arg1,arg2,...)</literal> вызывает Perl-скрипт
-            <literal>perlfile</literal>, с помощью соответствующей команды операционной системы и
-            передаёт в <literal>perlfile</literal> аргументы <literal>arg1</literal>,
-            <literal>arg2</literal> и так далее.
-        </para>
-        <para>
-            <literal>result = perl(...)</literal> возвращает результаты попытки Perl-вызова в
-            <literal>result</literal>.
-        </para>
-    </refsection>
-    <refsection role="see also">
-        <title>Смотрите также</title>
-        <simplelist type="inline">
-            <member>
-                <link linkend="unix">unix</link>
-            </member>
-        </simplelist>
-    </refsection>
-</refentry>
index 0001726..9093535 100644 (file)
@@ -657,32 +657,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: No es pot trobar el fitxer Perl: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr ""
-"%s: L'argument d'entrada #%d és d'un tipus incorrecte: Ha de ser una cadena "
-"de text.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: No s'ha especificat cap comanda perl."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: No s'ha trobat el Perl a '%s"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: No s'ha trobat el Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Error de sistema: Ordre executada: %s"
-
 msgid "Scilab Version: "
 msgstr ""
 
index 7ec4ead..7972556 100644 (file)
@@ -1088,42 +1088,6 @@ msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
 #
-# File: modules/core/macros/perl.sci, line: 26
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr ""
-
-#
-# File: modules/core/macros/perl.sci, line: 31
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr ""
-
-#
-# File: modules/core/macros/perl.sci, line: 46
-#, c-format
-msgid "%s: No perl command specified."
-msgstr ""
-
-#
-# File: modules/core/macros/perl.sci, line: 52
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr ""
-
-#
-# File: modules/core/macros/perl.sci, line: 68
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr ""
-
-#
-# File: modules/core/macros/perl.sci, line: 73
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr ""
-
-#
 # File: modules/core/macros/ver.sci, line: 19
 msgid "Scilab Version: "
 msgstr ""
index 070beba..ce6dbeb 100644 (file)
@@ -645,30 +645,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s. Nelze najít soubor Perl: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr "%s: Špatný typ vstupního argumentu #%d: Očekávány řetězce.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: Nebyl zadán žádný příkaz perl."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: Nelze nalézt Perl v '%s"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Nelze najít Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Systémová chyba: Provedený příkaz: %s"
-
 msgid "Scilab Version: "
 msgstr "Verze Scilab: "
 
index 4be18da..6fb5493 100644 (file)
@@ -642,30 +642,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: Kann Perl Datei nicht finden: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr "%s: unerwarteter Eingansargumentstyp  #%d: Zeichenkette erwartet\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: Kein Perl Befehl angegeben."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: Perl in '%s' nicht auffindbar"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Kann Perl nicht finden.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Systemfehler: Befehl ausgeführt: %s"
-
 msgid "Scilab Version: "
 msgstr ""
 
index 68e0a4d..cf2fafd 100644 (file)
@@ -667,31 +667,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: Incapaz de encontrar el archivo Perl: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr ""
-"%s: Tipo incorrecto del argumento de entrada #%d: Se esperaban strings.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: No se especificó un comando perl."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: Incapaz de encontrar Perl en '%s"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Incapaz de encontrar Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Error del sistema: Comando ejecutado: %s"
-
 msgid "Scilab Version: "
 msgstr ""
 
index e9fb632..c0ab795 100644 (file)
@@ -724,32 +724,6 @@ msgstr "%s : %s est une fonction non modifiable programmée en dur.\n"
 msgid "%s: Wrong number of input argument.\n"
 msgstr "%s : Nombre erroné d'argument d'entrée.\n"
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s : Impossible de trouver le fichier Perl : %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr ""
-"%s : Type erroné de l'argument d'entrée n°%d : Des chaînes de caractères "
-"attendues.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s : Commande perl non fournie."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s : Impossible de trouver Perl dans '%s"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s : Impossible de trouver Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s : Erreur système : Commande exécutée : %s."
-
 msgid "Scilab Version: "
 msgstr "Version de Scilab : "
 
index 7b500d9..4fd4263 100644 (file)
@@ -682,32 +682,6 @@ msgstr "%s: %s è una funzione precodificata non modificabile.\n"
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: Impossibile trovare il file Perl: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr ""
-"%s: L'argomento in ingresso #%d è di tipo sbagliato: era attese delle "
-"stringhe.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: Nessun comando Perl specificato."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: Impossibile trovare Perl in '%s"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Impossibile trovare Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Errore di sistema: comando eseguito: %s"
-
 msgid "Scilab Version: "
 msgstr "Versione di Scilab: "
 
index 9b05eae..b736970 100644 (file)
@@ -722,36 +722,6 @@ msgstr "%s: %s は編集不可のハードコードされた関数です.\n"
 msgid "%s: Wrong number of input argument.\n"
 msgstr "%s: 入力引数の数が間違っています.\n"
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: Perlファイルが見つかりません: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr "%s: 入力引数 #%d の型が間違っています: 文字列を指定してください.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: Perl コマンドが指定されていません."
-
-#
-# File: macros/perl.sci, line: 47
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: '%s' でPerlを見つけられません"
-
-#
-# File: macros/perl.sci, line: 63
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Perlを見つけられません。\n"
-
-#
-# File: macros/perl.sci, line: 68
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: システム・エラー: コマンドは実行されました: %s"
-
 msgid "Scilab Version: "
 msgstr "Scilabバージョン: "
 
index dd062bc..1ef4d7d 100644 (file)
@@ -661,30 +661,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: Nie można znaleźć pliku Perl: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr "%s: Nieprawidłowy typ argumentu wejściowego #%d: oczekiwano łańcuch.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: Nie określono polecenia perl."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: Nie odnaleziono Perl w '%s"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Nie odnaleziono Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Błąd systemu: Polecenie wykonane: %s"
-
 msgid "Scilab Version: "
 msgstr ""
 
index 24571b6..c6ed525 100644 (file)
@@ -670,31 +670,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: Incapaz de localizar arquivo Perl: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr ""
-"%s: Tipo incorreto para o argumento de entrada #%d: esperava-se um texto.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: Nenhum comando perl foi especificado."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: Incapaz de localizar Perl em '%s"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Incapaz de localizar Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Erro de sistema: Comando executado: %s"
-
 msgid "Scilab Version: "
 msgstr ""
 
index e1bda6d..9fe1db5 100644 (file)
@@ -690,30 +690,6 @@ msgstr "%s: %s является нередактируемой жёстко за
 msgid "%s: Wrong number of input argument.\n"
 msgstr "%s: Неверное количество входных аргументов.\n"
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: Файл Perl не найден: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr "%s: Неверный тип входного параметра №%d: ожидалась строка.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: Команда perl не была задана."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: Perl не найден в «%s»."
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: Perl не найден.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: Системная ошибка: выполняемая команда: %s"
-
 msgid "Scilab Version: "
 msgstr "Версия Scilab: "
 
index b948026..f95f35b 100644 (file)
@@ -736,32 +736,6 @@ msgstr "%s: %s є непридатною до редагування вбудо
 msgid "%s: Wrong number of input argument.\n"
 msgstr "%s: помилкова кількість вхідних параметрів.\n"
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s: не вдалося знайти файл Perl: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr ""
-"%s: помилковий тип вхідного параметра №%d: слід використовувати рядковий "
-"тип.\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: не вказано команди perl."
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: не вдалося знайти інтерпретатор Perl у «%s»"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: не вдалося знайти інтерпретатор Perl.\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: помилка системи: виконувалася команда: %s"
-
 msgid "Scilab Version: "
 msgstr "Версія Scilab: "
 
index 752587c..511ebf8 100644 (file)
@@ -636,30 +636,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s:无法找到 Perl 文件 %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr "%s:输入参数 #%d 的类型出错:应该为字符串。\n"
-
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s:没有指定 perl 命令。"
-
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s:在 “%s” 中没有找到 Perl"
-
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s:没有找到 Perl。\n"
-
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s:系统错误:命令 %s 被执行"
-
 msgid "Scilab Version: "
 msgstr "Scilab版本: "
 
index adbad88..d4fee77 100644 (file)
@@ -696,39 +696,6 @@ msgstr ""
 msgid "%s: Wrong number of input argument.\n"
 msgstr ""
 
-# File: macros/perl.sci, line: 12
-#, c-format
-msgid "%s: Unable to find Perl file: %s"
-msgstr "%s:無法找到 Perl 程序檔: %s"
-
-#, c-format
-msgid "%s: Wrong type for input argument #%d: Strings expected.\n"
-msgstr "%s: 輸入參數 #%d 型態錯誤: 應為字串.\n"
-
-#
-# File: macros/perl.sci, line: 32
-#, c-format
-msgid "%s: No perl command specified."
-msgstr "%s: perl 指令未給定(specified)."
-
-#
-# File: macros/perl.sci, line: 40
-#, c-format
-msgid "%s: Unable to find Perl in '%s"
-msgstr "%s: 無法在 '%s' 中找到 Perl"
-
-#
-# File: macros/perl.sci, line: 56
-#, c-format
-msgid "%s: Unable to find Perl.\n"
-msgstr "%s: 無法找到 Perl.\n"
-
-#
-# File: macros/perl.sci, line: 61
-#, c-format
-msgid "%s: System error: Command executed: %s"
-msgstr "%s: 系統錯誤: 執行指令為: %s"
-
 msgid "Scilab Version: "
 msgstr ""
 
diff --git a/scilab/modules/core/macros/perl.sci b/scilab/modules/core/macros/perl.sci
deleted file mode 100644 (file)
index 1bdbf5b..0000000
+++ /dev/null
@@ -1,79 +0,0 @@
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2004 - INRIA - Allan CORNET
-// Copyright (C) 2011 - DIGITEO - Allan CORNET
-//
-// Copyright (C) 2012 - 2016 - Scilab Enterprises
-//
-// This file is hereby licensed under the terms of the GNU GPL v2.0,
-// pursuant to article 5.3.4 of the CeCILL v.2.1.
-// This file was originally licensed under the terms of the CeCILL v2.1,
-// and continues to be available under such terms.
-// For more information, see the COPYING file which you should have received
-// along with this program.
-
-function [result, status] = perl(varargin)
-    commandLine = "";
-    lhs = argn(1);
-    rhs = argn(2);
-
-    //Function deprecated in Scilab 5.5 and obsolete in Scilab 6.0
-    warnobsolete(scilabRemovedVersion="6.0.0")
-
-    if (rhs) then
-        // Check that the first param is a file
-        [x,ierr]=fileinfo(varargin(1));
-        if ~isfile(varargin(1)) then
-            error(msprintf(gettext("%s: Unable to find Perl file: %s"), "perl", string(varargin(1))));
-        else
-            // Check that params are strings
-            for i=1:1:rhs,
-                if ~(type(varargin(i)) == 10) then
-                    error(msprintf(gettext("%s: Wrong type for input argument #%d: Strings expected.\n"), "perl", i));
-                end
-
-                idx=strindex(varargin(i)," ");
-                if ~( idx == 0 ) then
-                    varargin(i) = """" + varargin(i) + """";
-                end
-                if (i == 2) then
-                    commandLine = varargin(1) + " " + varargin(i);
-                else
-                    commandLine = commandLine + " " + varargin(i);
-                end
-            end
-
-            if (commandLine == "") then
-                error(msprintf(gettext("%s: No perl command specified."),"perl"));
-            else
-                if getos() == "Windows" then
-                    // For Windows
-                    pathPerl= fullfile(pathconvert(SCI,%f,%f,"w"),"\tools\perl\bin\perl.exe");
-                    if ~isfile(pathPerl) then
-                        error(msprintf(gettext("%s: Unable to find Perl in ''%s''"), "perl", pathPerl));
-                    else
-                        commandLine = "perl" + " " + commandLine;
-                        commandPerl = "set PATH=" + pathPerl + ";%PATH%&" + commandLine + ">"+TMPDIR+"\script";
-                        status = unix(commandPerl);
-                        result = mgetl(TMPDIR + "\script");
-                    end
-                else
-                    // For Linux
-                    status = unix("which perl" + ">" + TMPDIR + "/pathperl");
-                    pathperl = mgetl(TMPDIR + "/pathperl");
-                    if (status == 0) then
-                        commandLine = "perl" + " " + commandLine + ">" + TMPDIR + "/script";
-                        status = unix(commandLine);
-                        result = mgetl(TMPDIR+"\script");
-                    else
-                        error(msprintf(gettext("%s: Unable to find Perl.\n"), "perl"));
-                    end
-                end
-            end
-            if (status~=0) then
-                error(msprintf(gettext("%s: System error: Command executed: %s"), "perl", commandLine));
-            end
-        end
-    else
-        error(msprintf(gettext("%s: Wrong number of input arguments: At least %d expected.\n"), "perl", 1));
-    end
-endfunction
diff --git a/scilab/modules/core/tests/nonreg_tests/bug_9200.tst b/scilab/modules/core/tests/nonreg_tests/bug_9200.tst
deleted file mode 100644 (file)
index 906adb0..0000000
+++ /dev/null
@@ -1,22 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2011 - DIGITEO - Allan CORNET
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-//
-// <-- Non-regression test for bug 9200 -->
-//
-// <-- CLI SHELL MODE -->
-//
-// <-- INTERACTIVE TEST -->
-// 
-// <-- Bugzilla URL -->
-// http://bugzilla.scilab.org/show_bug.cgi?id=9200
-//
-// <-- Short Description -->
-// 
-// perl.sci script crashed on Windows with a wrong error message.
-
-// Copy perl to the SCI\tools\Perl directory (according the Readme.txt file in that directory). 
-// Run perl with any valid perl script as input.
diff --git a/scilab/tools/Perl/Readme.txt b/scilab/tools/Perl/Readme.txt
deleted file mode 100644 (file)
index 41f6165..0000000
+++ /dev/null
@@ -1,2 +0,0 @@
-Only for Windows.
-Copy bin,lib and site directories of Perl in this directory.
\ No newline at end of file
index 9b80fdc..ecf578b 100644 (file)
@@ -6,7 +6,6 @@
 ;##############################################################################################################
 
 ; Repertoire tools
-Source: tools\Perl\Readme.txt; DestDir: {app}\tools\Perl; Components: {#COMPN_SCILAB}
 Source: tools\curl\*.*; DestDir: {app}\tools\curl; Flags: recursesubdirs; Components: {#COMPN_SCILAB}
 Source: tools\zip\*.*; DestDir: {app}\tools\zip; Flags: recursesubdirs; Components: {#COMPN_SCILAB}
 Source: tools\gzip\*.*; DestDir: {app}\tools\gzip; Flags: recursesubdirs; Components: {#COMPN_SCILAB}