for (;;) {
	    grab_one(width,height,VIDEO_PALETTE_GREY);
	    memcpy(aa_image(ascii_img),image,awidth*aheight*4);
	    aa_render(ascii_img,&ascii_parms,0,0,awidth,aheight);
	    aa_flush(ascii_img);
	    usleep(refresh);
	}
	

	for (@files) {
	    $image->Read("$dir/$_");
	    $image->Rotate(degrees=>int rand 361, sharpen=>'true', crop=>'true');
	    $collage->Composite(compose => $compose[int rand scalar @compose], 
	                        gravity => $gravity[int rand scalar @gravity], 
	                        image   => $image);
	    undef @$image;
	}