需要使用 shell 脚本从目录中选择最新文件

Question

我是 Shell 脚本

的新手，我需要使用 Shell 脚本从目录中选择最新文件

目录名称 ： FTPDIR

此目录中的文件将是

APC5502015VP072020121826.csv
APC5502015VP082020122314.csv
APC5502015VP092020121451.csv
CBC5502015VP092020122045.csv
CBC5502015VP102020122045.csv
S5502015VP072020121620.csv
S5502015VP072020122314.csv
S5502015VP092020122045.csv

注意：（需要从每个组中选择一个最新）- 以下是我在执行 shell 脚本后需要获得的输出

APC5502015VP092020121451.csv
CBC5502015VP102020122045.csv
S5502015VP092020122045.csv

例如：在最新的文件APC5502015VP092020121451.csv中，没有092020121451是格式为：MMDDYYYYHHMM和字符串部分APC5502015VP的日期部分（字符串部分中的长度不固定）

我需要使用 shell 脚本从目录中选择这三个文件

你能帮我解决这个问题吗？

Answer 1

在

bash 中安全地执行此操作将非常成问题。 正如 Jonathan 提到的，空格或换行符等"特殊"字符可能会破坏您的脚本。

如果我们可以假设不会有任何这些，那么我们可以在 bash 中完成大部分工作，而无需涉及其他工具。

# Make an associative array to record types, in the second loop...
declare -A a
for file in *.csv; do
    # First, we convert the filenames into something that can be sorted.
    # The next three lines account for your "unknown length" in the first part
    # of the filename. We assume the date+time is the 12 chars before ".csv".
    new="$(rev <<<"$file")"
    new="${new:4:12}"
    new="$(rev <<<"$new")"
    new="${new:4:4}${new:0:2}${new:2:2}${new:8:4}"
    len=$(( ${#file} - 16 ))
    echo "$new ${file:0:$len} $file"
done | sort | while read date type file; do
    # Next, we print only the first of each "type"...
    if [[ ${a[$type]} -eq 0 ]]; then
        a[$type]=1
        echo "$file"
    fi
    # And stop once we have collected three types.
    if [[ ${#a[*]} -ge 3 ]]; then
        break
    fi
done

正如我所说，这不处理文件名中的换行符。

另请注意，这使用 rev 和 sort ，它们不是内置于 bash 中的。 rev部分可以在内部完成，使用更多的代码，这可能会使它们执行得更快，但只有在非常极端的情况下你才会看到差异。 关于sort，我们无能为力，因为 bash 中没有内置的。

Answer 2

这个 Perl 脚本适用于给定的数据。 毫无疑问，它可以改进。

#!/usr/bin/env perl
use strict;
use warnings;
my %bases;
while (<>)
{
    chomp;
    my $name = $_;
    my($prefix, $mmdd, $yyyy, $hhmm) = ($name =~ m/(.*)(d{4})(d{4})(d{4}).csv/);
    #print "$name = $prefix $yyyy $mmdd $hhmmn";
    my $stamp = "$yyyy$mmdd$hhmm";
    if (!exists($bases{$prefix}) || ($stamp > $bases{$prefix}->{stamp}))
    {
        $bases{$prefix} = { name => $name, stamp => $stamp };
    }
}
foreach my $prefix (sort keys %bases)
{
    print "$bases{$prefix}->{name}n";
}

输出：

APC5502015VP092020121451.csv
CBC5502015VP102020122045.csv
S5502015VP092020122045.csv

Answer 3

这是

awk 解决方案：

cd FTPDIR
ls -1|awk -F"VP" '{split($2,a,".");if(a[1]>b[$1]){b[$1]=$2}}END{for(i in b)print i"VP"b[i]}'

测试如下：

> cat temp
APC5502015VP072020121826.csv
APC5502015VP082020122314.csv
APC5502015VP092020121451.csv
CBC5502015VP092020122045.csv
CBC5502015VP102020122045.csv
S5502015VP072020121620.csv
S5502015VP072020122314.csv
S5502015VP092020122045.csv
> awk -F"VP" '{split($2,a,".");if(a[1]>b[$1]){b[$1]=$2}}END{for(i in b)print i"VP"b[i]}' temp
CBC5502015VP102020122045.csv
S5502015VP092020122045.csv
APC5502015VP092020121451.csv