$monitor->watch( { name => 'C:/Path', recurse => 1, callback => { files_created => sub { my ($name, $event, $change) = @_; print "@_\n callback fired \n"; #will print right away, (on linux anyways) } } } );