#!/usr/bin/perl -l
# test.pl

use strict;
use warnings;
use Sys::RunAlone;

print "Srini";

__END__