From 2b6b20e55b9f9c8b641fc49313d74d592813f5dd Mon Sep 17 00:00:00 2001
From: in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>
Date: Fri, 4 Jul 2003 03:23:19 +0000
Subject: use open/read instead cat

git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@1016 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
---
 util/BBSFileHeader.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'util')

diff --git a/util/BBSFileHeader.pm b/util/BBSFileHeader.pm
index e9cf3cdd..f203f57c 100644
--- a/util/BBSFileHeader.pm
+++ b/util/BBSFileHeader.pm
@@ -41,7 +41,10 @@ sub FETCH
     }
     elsif( $key eq 'content' ){
 	my $fn = "$self->{dir}/" . $self->FETCH("$num.filename");
-	return `/bin/cat $fn`;
+	my($c, $fh);
+	open $fh, "<$fn" || return '';
+	$fh->read($c, (-s $fn));
+	return $c;
     }
     else{
 	($h{filename}, $h{recommend}, $h{owner}, $h{date}, $h{title},
-- 
cgit v1.2.3