1 |
#!/usr/bin/perl -w # -*- cperl -*- # |
#!/usr/bin/perl -w # -*- cperl -*- # |
2 |
# |
# |
3 |
# gnump3d2 - A compatible Perl implementation of the original GNUMP3d. |
# gnump3d2 - A compatible Perl implementation of the original GNUMP3d. |
4 |
# |
# |
1531 |
# |
# |
1532 |
# |
# |
1533 |
my $suffix = &getSuffix( $file ); |
my $suffix = &getSuffix( $file ); |
1534 |
|
$suffix = lc( $suffix ); |
1535 |
my $configKey = "downsample_" . $quality . "_" . $suffix; |
my $configKey = "downsample_" . $quality . "_" . $suffix; |
1536 |
|
|
1537 |
my $cmd = &getConfig( $configKey, "" ); |
my $cmd = &getConfig( $configKey, "" ); |