my $name     = $wallpapers[rand(@wallpapers)];