Нет версии с бо́льшим разрешением.
Краткое описание
Source code
#!/usr/bin/perl
use strict ;
use warnings ;
use v5 .12 ;
use File::Temp qw/ tempdir / ;
use Graphics::Magick ;
use Math::Round qw(:all) ;
my $p = new Graphics:: Magick ;
$p -> Read ( "Felis_silvestris_silvestris_small.png" );
#$p->Resize('x600');
my ( $width , $height ) = $p -> Get ( 'width' , 'height' );
my $center = $height ;
my $result = new Graphics:: Magick ;
$result -> Set ( size => "${width}x${height}" );
$result -> Read ();
$result -> Set ( 'quality' , 100 );
my $dir = tempdir ( CLEANUP => 1 );
my $chop = 16 ; # 1 MCU normally
my $vertical = 0 ;
for my $n ( 0 .. ( $vertical ? $height:$width )) {
next if $n%$chop ;
my $current = $p -> Clone ();
$current -> Crop ( width => $vertical ? $width:$chop , height => $vertical ? $chop:$height , x => $vertical ? 0 : $n , y => $vertical ? $n:0 );
my $quality = round_even ( 100 * abs (( $n + 6 * $chop ) ** 4 / $center ** 4 ));
say $quality ;
$current -> Set ( 'quality' => $quality );
my $filename = sprintf "%s/%05d.jpg" , $dir , $n ;
$current -> Write ( $filename );
my $m = new Graphics:: Magick ;
$m -> Read ( $filename );
$result -> Composite ( image => $m , x => $vertical ? 0 : $n , y => $vertical ? $n:0 );
}
$result -> Write ( 'Felis_silvestris_silvestris_small_gradual_decrease_of_quality.png' );
Лицензирование
Вы можете свободно:
делиться произведением – копировать, распространять и передавать данное произведение
создавать производные – переделывать данное произведение
При соблюдении следующих условий:
атрибуция – Вы должны указать авторство, предоставить ссылку на лицензию и указать, внёс ли автор какие-либо изменения. Это можно сделать любым разумным способом, но не создавая впечатление, что лицензиат поддерживает вас или использование вами данного произведения.
https://creativecommons.org/licenses/by/3.0 CC BY 3.0 Creative Commons Attribution 3.0 true true
Исходный журнал загрузок
This image is a derivative work of the following images:
File:Felis_silvestris_silvestris.jpg licensed with Cc-by-3.0
2010-02-18T00:29:12Z Michael Gäbler 1496x1729 (1659050 Bytes) {{Information |Description=''[[Felis silvestris silvestris|Felis silvestris silvestris]]'' (Schreber, 1775) {{en|1=[[:en: European Wildcat|European Wildcat]]}} {{de|1=[[:de:Europäische Wildkatze|Europäische Wildkatze]] im [
Uploaded with derivativeFX
русский Добавьте однострочное описание того, что собой представляет этот файл
английский This is an example of the relationship between compression rate to quality of a .jpg image file. The rate is high compression to low quality.
История файла
Использование файла
Следующая страница использует этот файл:
Глобальное использование файла
Данный файл используется в следующих вики:
Использование в bn.wikipedia.org
Использование в en.wikipedia.org
Использование в en.wikibooks.org
Использование в et.wikipedia.org
Использование в fa.wikipedia.org
Использование в hi.wikipedia.org
Использование в it.wikipedia.org
Использование в ko.wikipedia.org
Использование в ml.wikipedia.org
Использование в ms.wikipedia.org
Использование в nn.wikipedia.org
Использование в simple.wikipedia.org
Использование в sv.wikipedia.org
Использование в th.wikipedia.org
Использование в uk.wikipedia.org
Использование в zh-yue.wikipedia.org