my $currentlog = "/perl/ass/@logfiles[$hour]";