--- amv.pl 2007/07/19 20:53:33 5 +++ amv.pl 2007/07/19 21:16:30 7 @@ -3,6 +3,10 @@ # amv.pl # # 07/19/07 19:21:39 CEST Dobrica Pavlinusic +# +# Various useful links used to produce this: +# http://www.moviecodec.com/topics/15431p1.html +# http://en.wikipedia.org/wiki/RIFF_(File_format) use strict; @@ -29,8 +33,10 @@ # calculate number of characters for offset #my $d = length( sprintf("%x",length($bytes)) ); my $d = 4; + my $prefix = '#.'; while ( $hex =~ s/^((?:\w\w\s){1,16})// ) { - printf "## %0${d}x | %-48s| %s\n", $o, $1, substr( $ascii, 0, 16 ); + printf "$prefix %0${d}x | %-48s| %s\n", $o, $1, substr( $ascii, 0, 16 ); + $prefix = '##'; if ( length($ascii) >= 16 ) { $ascii = substr( $ascii, 16 ); $o += 16;