小编unk*_*tha的帖子

我有一个由数百个文件组成的目录或文件夹.它们以字母顺序命名和排列.我想根据文件名的第一个字符将文件移动到目录或文件夹中(即从a一个文件夹开始的文件,以r另一个文件夹开头的文件等).

有没有办法在不使用CPAN模块的情况下完成它？

我想删除连续的重复行.即,例如

**test.txt**
car
speed is good
bike 
slower than car
plane
super fast
super fast
bullet train 
super fast

这将删除除第一次出现之外的所有重复行.

perl -ne 'print unless $a{$_}++'

但我想要的是输出

    **test.txt**
    car
    speed is good
    bike 
    slower than car
    plane
    super fast
    bullet train 
    super fast

我试过这个oneliner,但这并没有做什么,只是打印输入.

perl -00 -F'<\w+>|</\w+>' -i.bak -lane 'foreach(@F){if ($_=~/\w+/ && ($a ne $_)){print "$_";$a=$_;}}'

这该怎么做？？？

我是 Perl 的新手，我使用 Perl one-liners 以及一些简单的 Perl 脚本来完成我的任务。

我想知道是否有可能以代码格式组合一堆单行代码并仅运行包含单行代码的特定文件？例如，如果我有 3 个单线要一个接一个地运行，我可以将这 3 个单线放在一个名为file.pl 的文件中并运行它吗？

oneliner....
oneliner....

code

oneliner....

我感兴趣的所需格式如上所示。

LIST.txt
ark = 1  bark= 2  car  =3  dorm    =4
ark=8  bark  = 25  car  =  33  dorm  =5

我有一个名为LIST.txt的文件,如上所示.我希望输出如OUTPUT.txt中所示

OUTPUT.txt
ark=1  bark=2  car=3  dorm=4
ark=8  bark=25  car=33  dorm=5

我没有成功删除"="之前和之后的空格.我试图删除空格的方法让我产生了这样的东西

ark=1bark=2car=3dorm=4
ark=8bark=25car=33dorm=5

任何人都可以帮我解决这个问题.