#!/usr/bin/perl

use strict;
use warnings;

# You will need to install feh to make this work...
# You also need to create a folder called rotate in your home
# folder under Pictures...also the names of the pics
# need to be (1.jpg, 2.jpg, 3.jpg, etc.)
# Keep in mind these images will be centered and need to be the size of
# your resolution for best viewing.
# by: pretendeavor


# How many pictures you have in your rotate folder
my $num_of_pics = 10; 

# Get a random number from your total of pictures
my $pic = int(rand($num_of_pics)+1); 
chomp($pic);

# Change your background using feh to a random pic from rotate folder
print `feh --bg-center ~/Pictures/rotate/$pic.jpg`; 
      # or --bg-tile, --bg-scale, --bg-seamless