![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to delRS.pl CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Local Repository] / db / prgsrc|
Return to delRS.pl CVS log | Up to [Local Repository] / db / prgsrc |
| version 1.1, 2001/12/04 01:49:03 | version 1.2, 2001/12/21 11:54:37 |
|---|---|
| Line 33 if ($#ARGV<2) | Line 33 if ($#ARGV<2) |
| my($dumpname, $tablename, @names)=@ARGV; | my($dumpname, $tablename, @names)=@ARGV; |
| open (TABLE, $tablename) or die "0: Can not open ". $tablenamename; | open (TABLE, $tablename) or die "0: Can not open ". $tablename; |
| open (DUMP, $dumpname) or die "0: Can not open ". $dumpname; | open (DUMP, $dumpname) or die "0: Can not open ". $dumpname; |