Цель:

Создайте программу, чтобы найти самый маленький файл в текущей папке.

• Размер файла может быть измерен в байтах или символах.
• Если несколько файлов имеют одинаковый размер, вы можете выбрать один или отобразить все из них.
• Можно предположить, что в папке будет хотя бы один файл, а размер файлов не будет равен 0.

• Предположим, что все файлы в папке могут быть загружены языком, который вы используете.

• Предположим, что в текущем каталоге нет папок.

Входные данные:

Программа не должна принимать никаких действий от пользователя, кроме случаев, когда:

• Если у вашего языка нет «текущей папки», он может запросить у пользователя имя / путь к папке.
• Если ваш язык не может напрямую обращаться к файлам на вашем компьютере, он может позволить пользователю загружать файлы. (JavaScript, например)

Выход:

Имя самого маленького файла должно отображаться.

• Допускаются начальные / конечные символы, если ясно, какой файл был выбран.
• (Печать списка всех файлов противоречит правилам).

Примечания:

• Стандартные лазейки не допускаются.
• Вы не можете изменить / создать / удалить файлы в папке, чтобы изменить результат.
• Это код-гольф ; кратчайший ответ (в байтах) выигрывает.

Vim 12 байт

!!ls -Sa
Gd{

Попробуйте онлайн!

Объяснение:

!!это команда фильтра . Он передает содержимое текущей строки в произвольную системную команду и отправляет вывод обратно в буфер. Это полезно для использования внешних инструментов для вещей, в которых bash лучше, чем vim, например, !!revдля обращения к текущей строке или !Gxxdдля шестнадцатеричного буфера. В нашем случае буфер пуст, поэтому он эквивалентен :r!ls, который просто передает вывод команды в текущую строку.

Теперь курсор находится в строке 1, и мы хотим удалить каждую строку, кроме последней. Наивный подход

G       " Go to the last line
 k      " Go up one line
  d     " Delete:
   gg   "   Everything up to the first line

Но мы можем сделать лучше. Как я объяснил в этом наконечнике , то {можно , как правило (но не всегда) быть эквивалентны gg. Здесь даже лучше. Поскольку движение персонажа на основе , не построчного как ggесть, мы не должны идти вверх линию первым, оставив нам

Gd{

Bash + coreutils, 13 байт

ls -Sar|sed q

Объяснение:

ls -Sar|sed q
ls            # list files
   -S         # sorted, biggest first
     a        # show hidden files
      r       # reversed (smallest first)
       |sed q # q is quit at first line that matches given regex, 
              # given regex is empty so guaranteed match.         

Python 2 3, 94 76 74 54 байта

-18 байт благодаря @orlp
-2 байт благодаря @Jonathan Allan
-20 байт благодаря изменению спецификации вызовов

from os import*
print(min(listdir(),key=path.getsize))

PowerShell , 30 24 21 байт

(ls|sort le*)[0].Name

Попробуйте онлайн!

lsэто псевдоним для Get-ChildItem. Это связано sort-objectс lengthатрибутом, поэтому файлы сортируются по размеру. Мы индексируем это с помощью, (...)[0]чтобы получить первое (т.е. самое маленькое), а затем берем.Name его. Вывод через неявный Write-Outputпроисходит при завершении программы.

Сохранено 6 байт, поскольку мы гарантируем, что в каталоге существуют только файлы. Сохранено дополнительно 3 благодаря ConnorLSW.

Рубин, 61 40 38 37 байт

Спасибо GB и Value Ink

p Dir[?*,".*"].min_by{|x|File.size x}

Mathematica, 35 байт

FileNames[]~MinimalBy~FileByteCount

FileNames[]создает список имен всех файлов (и каталогов) в текущем каталоге; ~MinimalBy~FileByteCountвыбирает имя файла, чей счетчик байтов наименьший. FileByteCountвыдает кучу ошибок, когда применяется к каталогам, но ошибки не мешают работе программы.

Java 7, 149 142 байта

String f(){String n="";long s=-1>>>1,p;for(java.io.File f:new java.io.File(".").listFiles())if((p=f.length())<s){n=f.getName();s=p;}return n;}

Попробуйте онлайн!

-7 байт благодаря CAD97

SH (Linux / Unix) 15 14 13 14 байт

ls -aS|tail -1

-S сортирует по размеру (по убыванию),

-rпереворачивает и tail -1выводит последний файл в списке.

@ Dennis Спасибо за сохранение 1 байта @Dani_l Спасибо за сохранение 1 байта.

MATLAB / Octave, 52 48 байтов

d=dir;[~,n]=min([d.bytes]./~[d.isdir]);d(n).name

объяснение

Это получает список каталогов всех файлов и папок в текущем каталоге, используя dir. Выходной сигнал dirявляется structсодержащий имя файла, будь то каталог или нет, размер (в байтах) и т.д.

Затем мы можем взять массив размеров каждого в байтах [d.bytes]и выполнить поэлементное деление с логическим значением, указывающим, является ли это каталогом или нет, ~[d.isdir]который даст, Infгде это каталог (деление на ноль) и размер в байтах в противном случае (деление на 1).

Мы находим индекс минимума этого массива, используя второй вывод, minи используем его для индексации в исходной структуре и отображения имени сd(n).name

Скала, 52 байта

Старая версия, 79 байт

new java.io.File(".").listFiles.map(a=>a.getName->a.length)sortBy(_._2)apply(0)

Скорректировано в соответствии с рекомендациями jaxad0127. Сейчас это всего 52 байта.

new java.io.File(".").listFiles.sortBy(_.length)head

Пакет, 43 39 35 байт

@dir/b/os|(set/pf=&call echo %%f%%)

Выходные данные содержат пробел по некоторым причинам, но, к счастью, это разрешено. Редактировать: теперь при условии, что нет каталогов для сохранения 4 байта.

Perl 6 ,  33 32 31  16 байт

'.'.IO.dir.grep(*.f).min(*.s).put

Попытайся

put '.'.IO.dir.min:{try .s//Inf}

Попытайся

put $*CWD.dir.min:{try .s//Inf}

Попытайся

put dir.min: *.s

Попытайся

Expanded:

put        # print with trailing newline
dir        # the list of files in the current directory
.min:      # find the minimum by
  *.s      # calling the `s` method (size) in a Whatever lambda

J , 21 20 байт

>{.,(/:2&{"1)1!:0'*'

Сохраненный байт благодаря @ Конору .

объяснение

>{.,(/:2&{"1)1!:0'*'
                 '*' Glob all files in current directory
             1!:0    Table of file metadata in that directory
       2&{"1         Get the file size of each
     /:              Sort the files by that
   ,                 Flatten
 {.                  Get the first value
>                    Unbox

Пакетный файл, 77 72 63 байта

@FOR /F "tokens=*" %%G IN ('dir/o-s/b') DO @SET F=%%G
@ECHO %F%

Там нет прямого эквивалента headили tailв пакетном режиме, по крайней мере, насколько мне известно, так что это грязный обходной путь. (с большой помощью @Neil - спасибо!)

Команда dir, с помощью которой /o-sможно отсортировать файлы по убыванию и /bвывести только имена файлов. Мы перебираем их FOR /F, Fкаждый раз устанавливая переменную в имя файла. Наконец, мы выводим только последний с ECHO %F%.

Сохранено еще 9 байтов благодаря Нейлу и благодаря гарантиям отсутствия каталогов.

PHP, 84 62 байта

$t=array_map(filesize,$g=glob('*'));asort($t);echo$g[key($t)];

Так как вопрос был обновлен с предположением, что в текущем каталоге не будет папок, я смог удалить файл проверки файлов и проверить это.

Вот мой старый ответ:

$t=array_map(filesize,$g=array_filter(glob('*'),is_file));asort($t);echo$g[key($t)];

Это лучшее, что я мог сделать. Может быть, есть лучший способ, по которому я скучаю.

$t=array_map(              # visit each array element and...
    filesize,              # map each filename to its filesize...
    $g=array_filter(       # using an array of...
        glob('*'),         # all files and directories...
        is_file            # filtered by files...
    )                      # 
);                         # 
asort($t);                 # sort the array of filesizes, then...
echo$g[key($t)];           # print element from the array of files using the first key of the sorted array as an index

Node.js (используется walk), 114 байт

Игнорировать перевод строки:

require('walk').walk(__dirname).on('file',(r,s,n)=>
(m=s.size>m.size?m:s,n()),m=0).on('end',_=>console.log(m.name))

Это вызывает обходчика, который проходит через текущий каталог ( __dirname) и для каждого файла вызывает функцию со своим stat sи функцию next, n()которая должна быть вызвана для продолжения обхода. Затем в end, он печатает имя файла с sizeнайденным минимумом в байтах. s.size>m.sizeвозвращает falseкогда m.sizeесть undefined, поэтому после первого обратного вызова mон равен первому найденному файлу и продолжает оттуда нормально.

R, 36 байт

x=file.info(y<-dir())$s;y[x==min(x)]

Разъяснения

file.info()Возвращает data.frame«информацию о файле», когда ему дается символ или вектор символов имен файлов / папок, который при использовании в списке файлов / папок в текущем каталоге ( dir()) выглядит примерно так:

                                                               size isdir mode               mtime               ctime               atime exe
Polyspace_Workspace                                               0  TRUE  777 2014-11-28 17:29:25 2014-11-28 17:29:25 2014-11-28 17:29:25  no
Python Scripts                                                    0  TRUE  777 2016-03-21 23:59:41 2016-03-21 23:59:41 2016-03-21 23:59:41  no
R                                                                 0  TRUE  777 2015-12-23 20:11:02 2015-12-23 20:11:02 2015-12-23 20:11:02  no
Rockstar Games                                                    0  TRUE  777 2015-04-14 12:23:05 2015-04-14 12:23:03 2015-04-14 12:23:05  no
TrackmaniaTurbo                                                   0  TRUE  777 2016-03-24 17:15:05 2016-03-24 13:13:48 2016-03-24 17:15:05  no
ts3_clientui-win64-1394624943-2014-06-11 03_18_47.004772.dmp 314197 FALSE  666 2014-06-11 02:18:47 2014-06-11 02:18:47 2014-06-11 02:18:47  no

Впоследствии у нас просто найти имя файла, для которого sizeстолбец (сокращенно используя $s) является наименьшим. Следовательно, если существует более одного файла с наименьшим размером, все будут возвращены.

Бонус: если мы также хотим игнорировать папки в текущем каталоге, мы можем просто искать размер когда isdir == FALSE: x=file.info(y<-dir());y[x$s==min(x$s[!x$i])]получается 44 байта.

Tcl , 88 байт

set s Inf
lmap f [glob -ty f *] {if [set m [file si $f]]<$s {set n $f
set s $m}}
puts $n

Попробуйте онлайн!

SmileBASIC, 110 байт

DIM F$[0]FILES"TXT:",F$FOR I=0TO LEN(F$)-1F$[I][0]="TXT:
S=LEN(LOAD(F$[I],0))IF!Z||S<Z THEN Z=S:B=I
NEXT?F$[B]

Только смотрит на TXT:файлы, так как DAT:файлы не могут быть загружены, если вы уже не знаете их размер, что делает невозможным загрузку случайного.

Groovy , 49 байтов

m={f->f.listFiles().sort{it.length()}[0].getName()}

Попробуйте онлайн!

Закрытие, использование: m(new File("location"))

C #, 277 байт

Не самый короткий, но что вы ожидаете от C #?

Golfed

using System.Linq;using static System.IO.Directory;class P{static void Main(){var x=GetFiles(GetCurrentDirectory());var d=new long[]{}.ToList();foreach(var s in x){var b=new System.IO.FileInfo(s).Length;if(!d.Contains(b))d.Add(b);}System.Console.Write(x[d.IndexOf(d.Min())]);}}

Ungolfed

//Linq using for List.Min()
using System.Linq;
//Static using to save bytes on GetCurrentDirectory() and GetFiles()
using static System.IO.Directory;

class P
{
    static void Main()
    {
        //String array containing file paths
        var x = GetFiles(GetCurrentDirectory());
        //Creating a Long array and converting it to a list, less bytes than "new System.Collections.Generic.List<long>()"
        var d = new long[] { }.ToList();
        foreach (var s in x) //Loop through all file paths
        {
            //Getting file size in bytes
            var b = new System.IO.FileInfo(s).Length;
            if (!d.Contains(b))
                //If there isn't already a file with this size in our List, add the file path to list
                d.Add(b);

        }
        //Get index of the smallest Long in our List, which is also the index of the file path to the smallest file, then write that path
        System.Console.Write(x[d.IndexOf(d.Min())]);
    }
}

Röda , 32 31 байт

{ls""|sort key=fileLength|pull}

Это анонимная функция, которая сортирует файлы в текущем каталоге по длине файла и затем выбирает первый файл pull.

Используйте это так: main{ {ls""|sort key=fileLength|pull} }

SmileBASIC 3, 105 байт (конкурирует?)

Beats ответа 12Me21 в но по- прежнему страдает от невозможности загрузки DAT файлов (которые чувствуют себя очень жестоко быть дисквалифицирующими с учетом обстоятельств.)

DIM F$[0],T[0]FILES"TXT:",F$FOR I=0TO LEN(F$)-1F$[I][0]="TXT:
PUSH T,LEN(LOAD(F$[I]))NEXT
SORT T,F$?F$[0]

Более короткая версия выше раздражает и запрашивает каждый файл для загрузки, но это работает. Еще на два байта вы можете подавить подсказку; измените строку 2 на это:

PUSH T,LEN(LOAD(F$[I],0))NEXT

Пакетный файл, 33 байта

Пакетные файлы на этот раз умеренно конкурентоспособны, как ни странно.

@dir/os/b>..\q&set/pa=<..\q&"%a%.

Выход

Найдите способ остановить создание qдо dir/os/bзапуска, и вы сэкономите максимум 6 байтов, не помещая выходной файл в отдельный каталог.

@dir/os/b>q&set/pa=<q&"%a%

Будет всегда выводить q как наименьший файл (если он не связан с другим 0-байтовым файлом), так как он создается как пустой файл до того, как dir/b/osсоберет список файлов.

C ++ 17 (gcc) , 180 байт

#include<filesystem>
using namespace std::filesystem;auto f(){std::error_code e;path r;size_t m=-1,s;for(auto&p:directory_iterator(".")){s=file_size(p,e);if(s<m)m=s,r=p;}return r;}

Попробуйте онлайн!

Требуется новая стандартная библиотека, которая реализует std::filesystem.

Зш , 18 14 байтов

echo *(DoL[1])

Попробуйте онлайн! Попробуйте онлайн!

• (D) глобусы точечные файлы
• (oL) сортирует по размеру
• [1] выбирает первый матч