tryperl

#Created by tryperl.com
use strict;
use warnings;

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";
# print <>; #you can use the STDIN to put data into your program 

tryperl

use strict;
use File::Basename;


my $dir1 = "/home/lithium/edgemarts";
my $age1 = 2;
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time);
my $date = sprintf ('%4d-%02d-%02d %02d:%02d:%02d',
$year+1900,$mon+1,$mday,$hour,$min,$sec);
use Net::SMTP;

tryperl

#Created by tryperl.com
use strict;
use warnings;

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";
# print <>; #you can use the STDIN to put data into your program 

tryperl

#Created by tryperl.com
use strict;
use warnings;

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";
print <>; #you can use the STDIN to put data into your program 

tryperl

#Created by tryperl.com
use strict;
use warnings;

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";
# print <>; #you can use the STDIN to put data into your program 

tryperl

#Created by tryperl.com
use strict;
use warnings;

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";
# print <>; #you can use the STDIN to put data into your program 

tryperl

#!/usr/bin/perl
 
use warnings;
use strict;
 
open (FOO, "aen_output.txt") ||
    die "ERROR Unable to open test: $!\n";
my $last;
#my $first = <FOO>;
 

tryperl

#!/usr/bin/perl
 
$to = 'adarshjaiswal@hotmail.com';
$from = 'webmaster@yourdomain.com';
$subject = 'Test Email';
$message = 'This is test email sent by Perl Script';
 
open(MAIL, "|/usr/sbin/sendmail -t");
 
# Email Header

tryperl

#Created by tryperl.com

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";

my @vals = split(",", "eka");
print $vals[0];

tryperl

#Created by tryperl.com
use strict;
use warnings;

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";
# print <>; #you can use the STDIN to put data into your program