Select Code to Download

#! /usr/bin/perl -w
...
#@ DISPLAY_ITEM

sub insert_record
...

        # display confirmation to customer