新手求助，求助，麻烦走过路过的大神看一下 - perl吧

level 1

love华L 楼主

跟着生信自学网，想要提取压缩包到同一个文件夹里面，一直提示找不到模块
C:\Users\asus>cd C:\95immunePair\03.mRNAmerge\gdc_download_20210913_150657.840979.tar
C:\95immunePair\03.mRNAmerge\gdc_download_20210913_150657.840979.tar>perl moveFiles.pl
Can't load 'C:\Users\asus\AppData\Local\Temp\par-61737573\cache-1ee4556519677e46b75bd2e66c5d288d4da49292\4603e7f7.xs.dll' for module File::Glob: load_file:找不到指定的模块。 at C:/Strawberry/perl/lib/DynaLoader.pm line 193.
at C:/Strawberry/perl/vendor/lib/PAR/Heavy.pm line 140.
Compilation failed in require at script/moveFiles.pl.cp line 15.
BEGIN failed--compilation aborted at script/moveFiles.pl.cp line 15.

2021年09月14日 17点09分 1

level 12

HeMonseter

看看我的帖子和里面的评论

2021年09月29日 08点09分 2

莫过嗯

大神你好,我是一个在学习生信的医学生萌新, 很冒昧打扰你,看了您在贴吧的既往发言,感觉您真真大神,请救救偶的小命. 拜谢!!!问题是这样:我使用最新草莓版perl对TCGA下载的数据进行处理时,想要把多个文件夹里的gz文件汇总在同一个文件夹里,结果发现只生成了一个空表

2021年09月30日 20点09分

莫过嗯

,我把相同数据和代码发给我同学,结果却发现他可以跑出正常的结果,我想知道这可能是什么原因呢,我可以从哪里解决这个难题,从29号8点因为这个问题到这个点还没睡,一天多时间一直都在想办法解决这个问题,拜请指教

2021年09月30日 20点09分

莫过嗯

use strict; use warnings; my $newDir="files"; unless(-d $newDir) { mkdir $newDir or die $!; } my @allFiles=glob("*"); foreach my $subDir(@allFiles)

2021年09月30日 20点09分

莫过嗯

{ if(-d $subDir) { opendir(SUB,".\\$subDir") or die $!; while(my $file=readdir(SUB)) { if($file=~/\.gz$/) { `copy .\\$subDir\\$file .\\$newDir`; } } close(SUB); } }

2021年09月30日 20点09分

level 1

莫过嗯