my @all_pics = <~/Pictures/rotate/*.jpg>;

print `feh --bg-center $all_pics[ rand @all_pics ]`;