Parent Directory | Revision Log | Patch
revision 86 by dpavlin, Sun Nov 18 15:27:37 2007 UTC | revision 87 by dpavlin, Wed Dec 5 23:21:04 2007 UTC | |
---|---|---|
# | Line 36 sub firmware { | Line 36 sub firmware { |
36 | my $board = get_from($fh, 0x136, 6); | my $board = get_from($fh, 0x136, 6); |
37 | my $name = get_from($fh, 0x144, 15); | my $name = get_from($fh, 0x144, 15); |
38 | chomp($name); | chomp($name); |
39 | $name =~ s/\W+/ /gs; | |
40 | $version = join('.',unpack('CCCC', $version)); | $version = join('.',unpack('CCCC', $version)); |
41 | printf("%-8s %6s %-16s %s\n", $version, $board, $name, $path); | printf("%-8s %6s %-16s %s\n", $version, $board, $name, $path); |
42 | } | } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |