@seen {$n,} = (); .... @seen {$o,} = (); #### $seen{$n} = undef; $seen{$o} = undef; #### @seen {$n} = (); # note the lack of comma after $n .... @seen {$o} = ();