logging trap debugging
logging facility local7
logging source-interface fastEthernet x/y
logging <syslog-ng_server_IP>

Interface: Virtual-Access9
Username: xx
Profile: sdm-ike-profile-1
Group: xx
Assigned address: xx
Session status: UP-ACTIVE     
Peer: xx port xx
  IKE SA: local xx remote xx Active 
  IPSEC FLOW: permit ip xx host xx 
        Active SAs: 2, origin: crypto map
...

#!/usr/bin/perl -w

use Net::Telnet::Cisco;

my $session = Net::Telnet::Cisco->new(Host => '<IP_Address>');
$session->login('username', 'password');

my @clock = $session->cmd('show clock');
print @clock;
print "---------------------------------\n\n";

my @output = $session->cmd('show crypto session');
print @output;

print "=================================\n\n";

$session->close;

#!/usr/bin/perl -w

use Net::SSH:: Perl;

my $ssh = Net::SSH:: Perl->new('<IP_Address>');
$ssh->login('username', 'password');

my @clock = $ssh->cmd('show clock');
print @clock;
print "\n";
print "---------------------------------";
print "\n";

my @session = $ssh->cmd('show crypto session');
print @session;
print "\n";
print "=================================";
print "\n";