Correct timestamps usage in Perl bindings

This corrects which timestamps are used when applying values to
formatting strings, properly using starttime and endtime for EPG values,
rather than recstartts and recendts.

Signed-off-by: Raymond Wagner <rwagner@mythtv.org>

Author: Jaak Pruulmann-Vengerfeldt

mythtv/bindings/perl/MythTV/Program.pm

@@ -236,8 +236,8 @@ package MythTV::Program;
         my ($ssecond, $sminute, $shour, $sday, $smonth, $syear) = localtime($self->{'recstartts'});
         my ($esecond, $eminute, $ehour, $eday, $emonth, $eyear) = localtime($self->{'recendts'});
     # Program start/end times
-        my ($spsecond, $spminute, $sphour, $spday, $spmonth, $spyear) = localtime($self->{'recstartts'});
-        my ($epsecond, $epminute, $ephour, $epday, $epmonth, $epyear) = localtime($self->{'recendts'});
+        my ($spsecond, $spminute, $sphour, $spday, $spmonth, $spyear) = localtime($self->{'starttime'});
+        my ($epsecond, $epminute, $ephour, $epday, $epmonth, $epyear) = localtime($self->{'endtime'});
     # Format some fields we may be parsing below
         # Recording start time
         $syear += 1900;