sub ethGraph  {
  my $context    = shift;

  my $xsize    = "1";
  my $ysize    = "0.5";
  my $ylabel;
  my $xrange   = "00:24";
  my $yrange   = "0:40000";
  my $timeunit = "Heure";
  my $xtics    = "0,1,24";
  my $system   = `hostname`;
  my $sysdate  = "$context->{'day'}/$context->{'month'}/$context->{'year'}";
  my $nr = 0;
  my $total;
  my $view = "small"; #small large

  my $multi = 1;
  my $unit  = 0;

  my $old_time,$old_rbytes,$old_rerrors,$old_tbytes,$old_terrors,$old_drop,$old_colls;
  my $new_time,$new_rbytes,$new_rerrors,$new_tbytes,$new_terrors,$new_drop,$new_colls;

  my $delta_tim;
  my $interface;
  my $rfilename; 

sub dateControl {
  my $context    = shift;
  my $date = shift;

  my ($second, $minute, $hour, $mday, $month,$year,$wday, $yday, $stime) = localtime(time);

  $month += 1;
  $year+=1900;

  if($date =~ /(\d{2})(\d{2})(\d{2})) {
    ($day,$month,$year) = ($1,$2,$3);
  }

  $context->{'date'} = $year.$month.$day;
  $context->{'day'}  = $day;
  $context->{'month'}= $month;
  $context->{'year'} = $year;


}