#!/usr/bin/perl 
...
use Scraping::Amazon;
...
Scraping::Amazon::get($ref->{OEM_PartNum}, $ref->{Description});
...

##</code><code>##

package Scraping::Amazon;

...

sub get {
   ...
}

sub insertrecords {
   ...
}

1;