Index: /trunk/api/perl/t/100_flush_bug.t
===================================================================
--- /trunk/api/perl/t/100_flush_bug.t (revision 790)
+++ /trunk/api/perl/t/100_flush_bug.t (revision 813)
@@ -10,5 +10,5 @@
     LocalAddr => $testaddr,
     Proto     => 'tcp',
-    ReusAddr  => 1,
+    ReuseAddr => 1,
 );