Select Code to Download

Table: preferences
  +----+------------------+----------------------------+
...
  |  1 | item_enabled     | 1                          |
  |  2 | task_name        | something                  |
  +----+------------------+----------------------------+

  my $row=DB::Prefs->search({ name => "filename" })->first;
  print $row->value,$/;
  $row->value("/new/path/to/file");

  print DB::Prefs->filename,$/;
  DB::Prefs->filename("/new/path/to/file");

  package App::Prefs;
  use base 'App';
...
    }
    return defined($row) ? $row->value : undef;
  }