Ok, I am new to programming but I am a quick study. I have this script working.

#!/usr/bin/perl
@info=stat("/share/") or die "Can't stat share $!";
while (1) {
@newinfo=stat("/share/") or die "Can't stat share $!";
@what=qw(Device Inum Mode Links Owner Group Rdev Size Atime Mtime Ctime PBlock Blocks);
$x=0;
while (scalar(@info) > $x) {
system("/bin/echo $what[$x] $info[$x] $newinfo[$x]") if ($info[$x] ne $newinfo[$x]);
$x++;
}
@info=@newinfo;
sleep 1;
}
and the output of the script when a file is created or moved is this,
Mtime 1256325955 1256327234
Ctime 1256325955 1256327234
Atime 1256326852 1256327455
Atime 1256327455 1256327464
Atime 1256327464 1256327469
Links 9 8
Mtime 1256327234 1256327475
Ctime 1256327234 1256327475
Atime 1256327469 1256327483

I instead would like to be able to get the new file name and redirect this output to a file.

I know that this is possible I just need some help getting pointed in the right direction. I don't want anyone to do it for me I want to learn and don't mind reading.

All help is welcome and Thank you in advance.

Mike

First, please wrap code selections in [code][/code] tags. Second, if you're working on a Linux system, you should check out one of the inotify modules on CPAN. They give you access to the kernel's event system. A reasonably full-featured option looks to be Linux::Inotify2, but I haven't worked with it.

Telemachos

Thank you for the reply, I will use the code tags from now on. Also thanks for the inotify info I had see it but did not even really give it a second thought.

Thanks
Mike