Adding better stock images.

This commit is contained in:
sergiotarxz 2023-05-17 09:52:11 +02:00
parent cead74745b
commit a31e710285
3 changed files with 8 additions and 0 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 212 KiB

After

Width:  |  Height:  |  Size: 262 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 135 KiB

After

Width:  |  Height:  |  Size: 515 KiB

View File

@ -1,5 +1,7 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use v5.36.0;
use strict; use strict;
use warnings; use warnings;
@ -8,4 +10,10 @@ use lib curfile->dirname->sibling('lib')->to_string;
use Mojolicious::Commands; use Mojolicious::Commands;
# Start command line interface for application # Start command line interface for application
my @images = curfile->dirname->sibling('public')->child('img')
->list->grep(qr/\.generated\.png$/)->each;
for my $image (@images) {
system 'rm', '-v', $image;
}
Mojolicious::Commands->start_app('OwlcodeTech'); Mojolicious::Commands->start_app('OwlcodeTech');