From 5ca206ce46474fc47bfd966996df9fdbcb094a6c Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Sun, 21 Nov 2010 16:55:05 +0000
Subject: moving into ychat subdir

---
 scripts/modules/file.pm | 28 ----------------------------
 1 file changed, 28 deletions(-)
 delete mode 100644 scripts/modules/file.pm

(limited to 'scripts/modules/file.pm')

diff --git a/scripts/modules/file.pm b/scripts/modules/file.pm
deleted file mode 100644
index b11e2b3..0000000
--- a/scripts/modules/file.pm
+++ /dev/null
@@ -1,28 +0,0 @@
-sub dopen
-{
- my $shift = shift;
- opendir DIR, $shift or die "$shift: $!\n";
- my @dir = readdir(DIR);
- closedir DIR;
- return @dir;
-}
-
-sub fopen
-{
- my $shift = shift;
- open FILE, $shift or die "$shift: $!\n";
- my @file = <FILE>; 
- close FILE;
- return @file;
-}
-
-sub fwrite
-{
- my $shift = shift;
- my @file = @_;
- open FILE, ">$shift" or die "$shift: $!\n";
- print FILE @file;
- close FILE;
-}
-
-1;
-- 
cgit v1.2.3