A utility to mark and operate on files in the shell.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

9 lines
146 B

#!/usr/bin/env perl
use warnings;
use strict;
use 5.10.0;
use App::MarkFiles qw(get_dbh);
get_dbh()->prepare(q{DELETE FROM marks})->execute();