opendir(DIR, $show_dir); #Opens The Directory
		my @tempfiles = grep(/\.rar$/,readdir(DIR)); #Scans for files ending in .rar
		closedir(DIR); #Closes The Directory
		my $rar_file = $tempfiles[0]; #Chooses First .rar File Found
		$rar_file = "$show_dir\/$rar_file"; #Adds Full Path To Rar File Name
		my $rar_command = "unrar e \"$rar_file\" \"$output_rar\""; #Creates The Command Used To Unrar
		print "[INFO] Unraring file, Please Wait.\n"; #Alerts The User That We Are Going To Unrar
		`$rar_command`; #Unrars The File