У єдиний файл напишіть програму, яка не потребує введення даних і не дає результатів. Під час запуску він повинен змінити ім'я файлу, в якому він міститься, незалежно від того, що це ім’я , не змінюючи код або створюючи інші тривалі побічні ефекти.

Будь-який спосіб досягти цього - це добре. Важливо лише те, що після запуску програми єдиною тривалою зміною є те, що ім'я файлу було перевернуто. наприклад, в каталозі не повинно бути нових файлів.

Якщо запустити програму ще раз, слід змінити назву назад. Дійсно, програму слід мати можливість запускати довільно багато разів.

Для цілей цього виклику:

• Ви можете припустити, що імена файлів завжди є рядками з малих літер (az) довжиною від 1 до 127 символів. (Якщо ваша мова вимагає, щоб файли мали розширення для запуску, просто поверніть частину перед розширенням, наприклад mycode.bat→ edocym.bat.)
• Ви можете припустити, що файл коду знаходиться в каталозі сам по собі, тому він не матиме конфліктів імен (за винятком самого себе).
• Ви не можете припустити, що ім'я файлу не є паліндром, тобто те саме, коли перевертається. Імена файлів, які є паліндромами, повинні працювати так само добре, як і ті, що їх немає.
• Ви можете прочитати вміст або метадані вашого файлу. Тут немає обмежень щодо квіта .
• Можна припустити, що ваша програма буде працювати в певній, сучасній, звичайній операційній системі (наприклад, Windows / Linux), оскільки не всі оболонки мають однаковий набір команд.

Як конкретний приклад, скажімо, у вас програма Python у файлі, який називається mycodeу власному каталозі. Біг

python mycode

в терміналі має призвести до повернення імені файлу edocym. Файл edocymповинен бути один у своєму каталозі - жоден іменний файл більше не mycodeповинен існувати. Біг

python edocym

поверне ім'я назад до mycode, після чого процес можна буде повторити нескінченно.

Якщо той самий файл Python було перейменовано racecar(без зміни коду), а потім запустіть

python racecar

нічого не повинно помітно змінюватися, оскільки "гоночний автомобіль" є паліндром. Це те саме, якщо ім'я файлу було, скажімо, aабо xx.

Виграє найкоротший код у байтах. Tiereaker є вищою відповіді.

Bash + загальні утиліти Linux, 13 байт

Мій метод схожий на @ DigitalTrauma, але трохи коротший завдяки роботі з ls:

mv * `ls|rev`

C #, 153 байти

void f(){var x=System.Reflection.Assembly.GetExecutingAssembly().ManifestModule.Name;File.Move(x,new string(x.Reverse().ToArray()).Substring(4)+".exe");}

OO круто, і все, поки у вас визначена змінна:

System.Reflection.Assembly.GetExecutingAssembly (). ManifestModule.Name

це просто означає

Bash + загальні утиліти Linux, 15

• 1 байт збережено завдяки @Dennis

Передбачає, що сценарій знаходиться в каталозі сам по собі.

mv * `rev<<<$0`

Юлія, 51 байт

d,f=splitdir(@__FILE__)
cd(d)do
mv(f,reverse(f))end

Ця програма повинна бути агностичною, хоча вона була протестована лише на OS X.

Безголівки:

# Get the directory and file name of the current source file
d, f = splitdir(@__FILE__)

# Change the working directory temporarily to d
cd(d) do
    # Overwrite the file with the reverse of its name
    mv(f, reverse(f))
end

MATLAB, 50 46 байт

e='.m';x=mfilename;movefile([x e],[flip(x) e])

Дякуємо @Suever за видалення 4-х байт та тестування!

Тестували на OS X El Capitan і Debian Jessie, обидва з версією Matlab R2014a.

У Windows потрібен прапор 'f'( e='.m';x=mfilename;movefile([x e],[flip(x) e]),'f'), щоб змінити ім'я файлу під час використання файлу.

Як це працює

e='.m';                       % Store file extension '.m' in variable `e`
x=mfilename;                  % Get name of file being run, without the extension
movefile([x e],[flip(x) e])   % Move (rename) file. `flip` is used for reversing the
                              % name without extension. [...] is (string) concatenation

Рубін, 24 байти

File.rename$0,$0.reverse

Досить зрозуміло. ( $0це ім'я файлу, який виконується.)

Запустіть із ruby whateverробочим каталогом каталогу, який містить файл.

Пакет, 109 байт

@echo off
set f=%0
set r=
:l
set r=%f:~0,1%%r%
set f=%f:~1%
if not .%f%==. goto l
ren %0.bat %r%.bat

Примітка 1: Пакетні файли повинні закінчуватися .bat; передбачається, що пакетний файл виконується його ім'ям без розширення, і що .batне підлягає поверненню. Наприклад, reverseспробу перейменувати reverse.batв esrever.bat.
Примітка 2: CMD.EXEпомилки після перейменування пакетного файлу. ( COMMAND.COMне буде, за винятком того, що це в першу чергу нездатне до маніпуляцій з рядками.)

Редагувати: збережено 2 байти, використовуючи гарантію, що ім'я файлу є алфавітним (на основі коментаря @ CᴏɴᴏʀO'Bʀɪᴇɴ).

C, 102 байти

main(c,v)char**v;{char*b=strdup(*v),*n=strrchr(*v,47),*t=strchr(b,0);for(;*++n;*--t=*n);rename(*v,b);}

Зламатися:

                            // No #include lines required (for GCC at least)
main(c,v)char**v;{          // K&R style function to save 2 bytes
    char*b=strdup(*v),      // Duplicate args[0] (script path)
        *n=strrchr(*v,47),  // Find last "/" in input
        *t=strchr(b,0);     // Go to end of output string
    for(;*++n;*--t=*n);     // Reverse input into output character-by-character
    rename(*v,b);           // Rename the file
}                           // Implicit return 0

Нарешті, виклик, коли C не (цілком безнадійно) неконкурентоспроможний!

Якщо ми візьмемо «Можна припустити , робочий каталог оболонки буде папка файл в" означає , що програма завжди буде служити ./myexecutable, ми можемо спростити , *n=strrchr(*v,47)щоб *n=*v+1врятувати 10 символів, але це не зовсім є правомочним ( його можна викликати як ././myexecutable, наприклад).

Крім того, якщо ви хочете зберегти розширення файлу (наприклад, ".out") в такт, ви можете змінити його *t=strchr(b,0)до *t=strrchr(b,46)2 байти. Не потрібно, хоча.

Віци + * ш, 15 байт

iG:`?r.iG' mr',

Пояснення

iG:`?r.iG' mr',
i               Push -1 to the stack. (this assumes that no arguments are passed)
 G              Get the use name of the class specified by the top item of the
                stack. (-1 refers to the origin class, so this class)
  :             Duplicate stack and jump to it.
   `            Read a file with the current stack as its name, replacing the stack
                with the file's contents.
    ?           Shift one stack to the right.
     r          Reverse the current stack.
      .         Write a file with the name specified by the top stack and the
                contents as the second-to-top stack.
       iG       Get the name of the current class again.
         ' mr'  Push 'rm ' to the stack.
              , Execute the current stack as a command.

Зауважте, що для цього подання слід використовувати незахищену версію Vitsy (неможливо зробити це на веб-сайті Try it Online!)

Perl 5, 18 байт

Трохи схожий на Ruby (біг perl nameofscript):

rename$0,reverse$0

Врахування можливого шляху є більш потворним (47 байт)

($a,$b)=$0=~/(.*\/)?(.*)/;rename$0,$a.reverse$b

V , 29 26 байт

:se ri
izyw:!mv z "
dd

Оскільки він містить недруковані версії, ось шістнадцятковий дамп:

00000000: 3a73 6520 7269 0a69 127a 1b79 773a 216d  :se ri.i.z.yw:!m
00000010: 7620 127a 2012 220a 6464                 v .z .".dd

Примітка: це не буде працювати на v.tryitonline.net, оскільки TIO не дозволяє доступ до файлів.

Пояснення:

:se ri            "Turn on 'reverse mode' (all text is inserted backwards)
i<C-r>z<esc>      "Enter the path to the file in reverse
yw                "Yank a word. This first word is the name we will save the new file as

"Run an "mv" in the terminal with the contents of register 'z' (the path to the file)
"And the contents of register '"' (the word we yanked)
:!mv <C-r>z <C-r>"

dd                "Delete a line so that we don't have any text printed.

Python 3, 105 байт

import os;a=__file__.split('\\')[::-1][0].split('.');os.rename('.'.join(a),'.'.join([a[0][::-1],a[1]]))

-Alex.A видалив 1 байт.

-Digital Trauma показав мені os.rename (), який забрав 62 байти.

-мудріф видалив 7 байт.

PHP, 84, 70, 54 байти

rename($f=__FILE__,strrev(basename($f,$e='.php')).$e);

PowerShell, 39 байт

mi *(-join((ls).name)[-5..-999]+'.ps1')

Python 2 , 41 байт

import os;s=__file__;os.rename(s,s[::-1])

Демо на Bash.

Python насправді не хвилює розширення файлу, тому ми можемо просто перевернути все ім’я файлу.

PHP, 31 байт

Думаю, нічого не пояснюю:

rename($x=$argv[0],strrev($x));

Perl 6 ,  70   27 байт

Якщо вам потрібно було працювати в іншому робочому каталозі, вам знадобиться щось подібне:

$_=$*PROGRAM;.rename: .basename.flip.IO.absolute: .absolute.IO.dirname

Оскільки робочий каталог буде тим самим каталогом, що і програма, його можна спростити просто:

$_=$*PROGRAM;.rename: .flip

Пояснення:

$_ = $*PROGRAM;  # IO::Path object

$_.rename:
    $_.basename
      .flip      # reverse characters
      .IO        # turn into an IO object (IO::Path)
      .absolute: # turn it into an absolute path Str in the following dir
        $_.absolute.IO.dirname

JavaScript (Вузол), 108 104 68 байт

36 байтів збережено, завдяки Downgoat!

Версія Windows:

require("fs").rename(F=__filename,F.split(/.*\\|/).reverse().join``)

Інша версія:

require("fs").rename(F=__filename,F.split(/.*\/|/).reverse().join``)

JavaScript ES6 (Node.js) 70 байт

Немає Regex Yay!

require("fs").rename(a=__filename,[...a].reverse().join``.split`/`[0])

Будь-яка допомога вдячна

PowerShell v4 +, 68 байт

$a,$b=($c=(ls).Name)-split'\.';mv $c "$(-join($a[$a.length..0])).$b"

Працює лише тому, що сценарій гарантовано сам знаходиться в каталозі. Виконує ls(псевдонім для Get-ChildItem) і приймає .Nameрезультат (-ів), що виникає. Ми зберігаємо , що $cі тоді -splitвін на буквальний період , щоб отримати ім'я файлу і розширення, і зберегти їх в $aі $b, відповідно.

Далі йде команда mv(псевдонім для Move-Item), куди ми рухаємось $cдо $a(назад) .$b.

Приклад

PS C:\Tools\Scripts\golfing\reverse> ls

    Directory: C:\Tools\Scripts\golfing\reverse

Mode                LastWriteTime     Length Name
----                -------------     ------ ----
-a---         6/13/2016   7:58 AM         88 reverse.ps1

PS C:\Tools\Scripts\golfing\reverse> .\reverse.ps1

PS C:\Tools\Scripts\golfing\reverse> ls

    Directory: C:\Tools\Scripts\golfing\reverse

Mode                LastWriteTime     Length Name
----                -------------     ------ ----
-a---         6/13/2016   7:58 AM         88 esrever.ps1

Python (2,7 або 3,4+), 61 49 байт

Я вважаю, що це близько до оптимального рішення Python:

import os;a=__file__;os.rename(a,a[-4::-1]+".py")

Натхненний відповіддю s4b3r6's, але використовує нарізку списку замість зворотного і зберігає __file__змінну, щоб зберегти байти при використанні її двічі.

Примітка. Це передбачає, що ім'я файлу завжди *.py. Трохи більш загальне рішення, яке може обробити будь-яке розширення двох символів, було б використовувати a[-3:]для заміни ".py"ціною 1 зайвий байт.

Оновлення. Збережено 12 байтів, використовуючи трюк нарізки списку, a[-4::-1]щоб видалити розширення файлу, а не розбивати його, а потім реверсувати a.split(".")[0][::-1].

Powershell, 112 байт

Я не збираюся бити unix cmds, просто додаю свої два пенси для забави :-)

gci * | % { $n=($_.basename[-1..-(($_.basename).length)] -join “”)+$_.Extension; mv -Path $_.Fullname -Dest $n }

PowerShell, 50 байт

mv *(-join($f=(ls).BaseName)[$f.Length..0]+'.ps1')

Існує лише один файл, тому mv *підстановочний символ оболонки матиме лише один результат. Назва призначення - (ls).basenameце список усіх файлів (псевдонім для 'dir'), вимагає властивості BaseName - а оскільки є лише один файл, PowerShell розпакує масив 1-го елемента в рядок. Збережіть це ім'я файлу $f, а потім індексуйте його за допомогою зворотного відліку, а -joinсимволи повернуті назад - у рядок. Додайте обов’язковий .ps1суфікс.

AutoIt, 45 байт

$a=@ScriptName
FileMove($a,StringReverse($a))

Python 2.7, 68 байт

import os; a = __ файл __; os.rename (a, a.split ("\\") [- 1] [: - 3] [:: - 1] + ". py")

Це, мабуть, найкраще, що я можу отримати. Я просто довів себе неправильним.

Пітон (2 і 3), 88 78 байт

import os;os.rename(__file__,''.join(reversed(__file__.split(".")[0]))+".py"))

Експлуатує той факт, що ім'я файлу задається sys.argv (як робоча директорія - це папка, у якій знаходиться файл), і використовує os.rename. Прикро, повернутий назад повертає ітератор, тому нам доводиться використовувати приєднання.

Редагувати: збережено 10 байтів, використовуючи __file__ замість sys.argv [0], як запропонував @muddyfish @DigitalTrauma.

tcl, 42

file rename $argv0 [string reverse $argv0]

Візуальний базовий сценарій, 44 байти

WScript.Echo(StrReverse(WScript.ScriptName))

Приклад виводу для файлу під назвою reverse.vbs(Запуск із cscript):

sbv.esrever

sfk , 83 байт

list -maxfiles=1 . +setvar n +getvar n +swap +setvar m +ren -var . /#(n)/#(m)/ -yes

Спробуйте в Інтернеті!

SmileBASIC 60 байт

P$=PRGNAME$()FOR I=1-LEN(P$)TO.Q$=Q$+P$[-I]NEXT
RENAME P$,Q$

Альтернатива:

P$=PRGNAME$()T$=P$*1WHILE""<T$Q$=Q$+POP(T$)WEND
RENAME P$,Q$