simcop2387/DBD-SQLite-SQLcipher
1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00
Code Issues Releases Wiki Activity

download url has changed since 3.7.16

Browse source
This commit is contained in:
Kenichi Ishigaki 2013-03-20 13:31:05 +00:00
parent 719f7aa021
commit ed6a158a8f
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
util/getsqlite.pl
View file

@ -28,9 +28,12 @@ my $version_as_num = sprintf( q{%u%02u%02u%02u}, @version_parts );
my $version_dotty = join '.', ($version_parts[3] ? @version_parts : @version_parts[0..2]); my $version_dotty = join '.', ($version_parts[3] ? @version_parts : @version_parts[0..2]);
my $is_pre_30704_style = ($version_as_num < 3070400); my $is_pre_30704_style = ($version_as_num < 3070400);
my $version_for_url = $is_pre_30704_style ? $version_dotty : $version_as_num; my $version_for_url = $is_pre_30704_style ? $version_dotty : $version_as_num;
my $year = "";
if ($version_as_num >= 3071600) {
$year = "2013/";
}
my $url_to_download = qq{http://www.sqlite.org/${year}sqlite-}
my $url_to_download = q{http://www.sqlite.org/sqlite-}
. ($is_pre_30704_style ? q{amalgamation} : q{autoconf}) . ($is_pre_30704_style ? q{amalgamation} : q{autoconf})
. qq{-$version_for_url.tar.gz}; . qq{-$version_for_url.tar.gz};
print("downloading $url_to_download\n"); print("downloading $url_to_download\n");