Boot Camp: Difficulty using Multi-Touch trackpad in Windows
If you are using Microsoft Windows Vista or XP on your MacBook, MacBook Pro, or MacBook Air with a Multi-Touch trackpad, you may have difficulty using the trackpad to select or drag items on the screen. You may notice any of the following: When using your thumb to click an item the cursor may move slightly and not select the intended item. The cursor may shake when you press or remove your finger from the trackpad. If you press down with your thumb, then use your finger to select or drag an item, the cursor may unexpectedly release.
Touch(3pm) User Contributed Perl Documentation Touch(3pm)NAME
File::Touch - update access and modification timestamps, creating nonexistent files where necessary.
SYNOPSIS
use File::Touch;
@file_list = ('one.txt','../two.doc');
$count = touch(@file_list);
use File::Touch;
$reference_file = '/etc/passwd';
$touch_obj = File::Touch->new(
reference => $reference_file,
no_create => 1
);
@file_list = ('one.txt','../two.doc');
$count = $touch_obj->touch(@file_list);
DESCRIPTION
Here's a list of arguments that can be used with the object-oriented contruction:
atime_only => [0|1]
If nonzero, change only the access time of files. Default is zero.
mtime_only => [0|1]
If nonzero, change only the modification time of files. Default is zero.
no_create => [0|1]
If nonzero, do not create new files. Default is zero.
reference => $reference_file
If defined, use timestamps from this file instead of current time. Default is undefined.
atime => $time
If defined, use this time (in epoch seconds) instead of current time for access time.
mtime => $time
If defined, use this time (in epoch seconds) instead of current time for modification time.
Examples
Update access and modification times, creating nonexistent files
use File::Touch;
my @files = ('one','two','three');
my $count = touch(@files);
print "$count files updated
";
Set access time forward, leave modification time unchanged
use File::Touch;
my @files = ('one','two','three');
my $day = 24*60*60;
my $time = time() + 30 * $day;
my $ref = File::Touch->new( atime_only => 1, time => $time );
my $count = $ref->touch(@files);
print "$count files updated
";
Set modification time back, update access time, do not create nonexistent files
use File::Touch;
my @files = ('one','two','three');
my $day = 24*60*60;
my $time = time() - 30 * $day;
my $ref = File::Touch->new( mtime => $time, no_create => 1 );
my $count = $ref->touch(@files);
print "$count files updated
";
AUTHOR
Nigel Wetters Gourlay (nwetters@cpan.org)
COPYRIGHT
Copyright (c) 2001,2007,2009 Nigel Wetters Gourlay. All Rights Reserved. This module is free software. It may be used, redistributed
and/or modified under the same terms as Perl itself.
perl v5.10.0 2009-07-25 Touch(3pm)