summaryrefslogtreecommitdiff
path: root/0.8/scripts/modules/file.pm
diff options
context:
space:
mode:
Diffstat (limited to '0.8/scripts/modules/file.pm')
-rw-r--r--0.8/scripts/modules/file.pm28
1 files changed, 0 insertions, 28 deletions
diff --git a/0.8/scripts/modules/file.pm b/0.8/scripts/modules/file.pm
deleted file mode 100644
index b11e2b3..0000000
--- a/0.8/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;