That's

my %separators = (
    linux => '/',
    MSWin32 => '\\',
    darwin => '/',
);
[download]

There's other possible values, but the script could be restricted to run on only the "supported" platforms via

die "This script doesn't yet run on $^O\n"
    unless $separators{$^O};
[download]