git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@182 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
tdressler
2008-05-11 21:01:17 +00:00
parent e5c5707a3b
commit 5fdc39ca56
3 changed files with 30 additions and 22 deletions

View File

@@ -149,9 +149,11 @@ FileLog_Get($@)
return "Usage: get $a[0] <from> <to> <column_list>" if(int(@a) != 4);
my $fh = new IO::File $hash->{currentlogfile};
seekTo($fh, $hash, $a[1]);
# my @arr =
# my @arr =
my $data='';
while(my $l = <$fh>) {
last if($l gt $a[2]);
$data.=$l;
}
close($fh);
return "EOF" if(!defined($data));