Search results for query: *

I have the following script but it never moves the file... does anyone see why it might not be working?? #!/usr/bin/perl use File::stat; $req = "D:\\Temp\\In"; #give the location of the source files opendir(DIR ,"$req") or die "cannot open $req"; $outfile = "list.txt"; open OUT...

Does anyone know of a simple, say two lines of code i can use to test if a file is growing, and if it's not move it to a unc path?

The goal is to look at a directory and write the contents to a file sorted by date modified or date created.

I probably want 'mtime' not 'ctime'. I am looking for some examples on how i can use this.

I would probably want to use 'ctime' in the stat function but how would i sort them. I would probably need to obtain that info on all the files first...??

I am using the following to output a file listing the contents of a directory. Is there anyway i can modify this to output by date created or date modifed? #!perl print "Content-type: text/plain\n\n"; # Configuration: $internal_path = "r:/"; $list_directories = "true"; $list_files = "true"...

I found this code to delete every that is *.tst but how can i can it to delete anything that's ._*.* unlink qq($dir\\$file) if $file=~/\.tst$/i;

I have the following code to mirror a directory on change but haven't found a way to make the files only 0bytes in size. #!/usr/bin/perl # Allow us to copy files correctly. use File::Copy; # User-configurable. Don't include a / at the end of the path. # Source = Base directory to start the...

Hi, I need to mirror a directory using perl but the destination directory files needs to be 0 bytes in size. So i will end up with a directory of files names simular to a log but with actual files. Thanks,

Hi all... i am using the following HTML to load a flash video on a iweb page. Is there a way i create links on my page to different flash files on my web server and have it play that video? I would think i have to set the 'embed src' and 'value' to a variable that's changed every time a new...

how can i rename all the files in a folder to the folder name and append _1 _2 _3 and so on for each additional file in the folder?

I tried the following and it still not deleting the file i have listed in the my deletelist. #!/usr/bin/perl open FH, "deletelist.dat"; unlink map { "C:/Temp/" . $_ } <FH>; close FH;

if it's windows, i can simple change that to "C:\test\" , correct?

In my list, do i need the full path to the file if i use it this way? open FH, "list_of_files.txt"; unlink <FH>; close FH;

is there a simple comand to unlink specific files or reference everything in a text file?

What is the most efficent and simplest way to delete files from a directory. Control whats deleted by a text file that list files that can be deleted.

it's running on a windows machine.

I am having a problem with this script. I connect to a mapped drive and test against a text file(listDir.txt) if those files listed in the text file are in the directory. if there is a file that is in the directory but not on the list, it get deleted. My problem is the drive become...

How do i remove the path from being printed? #!/opt/perl5/bin/perl use strict; use warnings; my @files = glob "*"; my $string; for (@files) {$string .= $_ . " "} $string .= "\n"; print $string;

Hi, I am looking to do the following in perl. I know how to do it in vb but need it in perl. I need a script to open a text file with test that contain file names, one per line. Once it opens the file, i need to remove the carage return and separate the file names by a space. Also, i need...