my $link = "err";

  if ($q->param('title') == "Political Animal")
    {
      my $link = "pa";
    }
  elsif ($q->param('title') == "Newslink")
    {
      my $link = "nl";
    }
  elsif ($q->param('title') == "New Slang")
    {
      my $link = "ns";
    }elsif ($q->param('title') == "Rant With Ryan")
    {
      my $link = "rwr";
    }
  elsif ($q->param('title') == "Planet Venus")
    {
      my $link = "pv";
    }
  elsif ($q->param('title') == "All Day Breakfast")
    {
      my $link = "adb";
    }
  else
    {
      my $link = "err";
    }

# add item (tech. replace)
  LSRfm::Database::Podcasts->create({'title' => $q->param('title'),
                                        'description' => $q->param('description'
                                        'short_description' => $q->param('descri
                                        'picture' => $q->param('picture'),
                                        'alt' => $q->param('alt'),
                                        'updated' => Class::Date->now(),
                                        'link' => $link
                                });