Select Code to Download

#!/usr/bin/perl -w

...
@stat{@labels} = @stat;

is_deeply($stat, \%stat, '... look twins!');

use strict;
use Data::Dumper;
...
          'ino' => 5795297,
          'gid' => 0
        };