#!/usr/bin/perl

use strict;
use warnings;
use CPAN;

open STDOUT, '>', '/root/Desktop/CGIdeps';
system("cpandeps CGI");
close STDOUT;