Changeset 249

Show
Ignore:
Timestamp:
06/24/11 15:26:04 (3 years ago)
Author:
depesz
Message:

silence the warning

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/tools/fast.dump.and.restore/fast.dump

    r248 r249  
    7070 
    7171    open my $fh, ">", File::Spec->catfile( $self->{ 'output' }, 'index.lst' ) or croak( "Cannot create index file: $OS_ERROR\n" ); 
    72     printf $fh '%-5s | %-7s | %-32s | %-32s | %s%s', qw( # type schema table condition ), "\n"; 
     72    printf $fh '%-5s | %-7s | %-32s | %-32s | %s%s', '#', qw( type schema table condition ), "\n"; 
    7373    for my $i ( @{ $self->{'blobs'} } ) { 
    7474        printf $fh '%5d | %-7s | %-32s | %-32s | %s%s', @{ $i }{ qw( id blob_type schema table ) }, ( $i->{'condition'} || '' ), "\n";