#!/usr/bin/perl5.8.8

use strict;
use warnings;
	my $cmd = "-s /home/vcg/Documents/Trial/temp";
 	if	(system($cmd) == 0)
	{
	print "File exists!";
	}
	else { print "File does NOT exist!";}