Jemand zu Hause?![[twitter]](/battie/theme/default/icons/twitter.gif){kind=icon}
Leser: 2
 |
|< 1 2 3 >| |  |
22 Einträge, 3 Seiten |
![[default_avatar]](/battie/theme/default/default_avatar.gif){kind=avatar}
1
2
3
4
5
6
7
8
#!/usr/bin/perl
use strict;
use warnings;
my $newest = shift @{[sort {-M $a > -M $b} (<*.jpg>)]};
unlink 'aktuell.jpg' or die "$!";
symlink $newest, 'aktuell.jpg' or die "$!";
1
2
3
4
5
6
7
8
#!/usr/bin/perl
use strict;
use warnings;
my $newest = shift @{[sort {-M $a > -M $b} (<*.jpg>)]};
unlink 'aktuell.jpg' or die "$!";
symlink $newest, 'aktuell.jpg' or die "$!";
1
2
3
4
5
6
7
8
#!/usr/bin/perl
use strict;
use warnings;
my $newest = shift @{[sort {-M $a > -M $b} (<img*.jpg>)]};
unlink 'aktuell.jpg' or die "$!" if -e 'aktuell.jpg';
symlink $newest, 'aktuell.jpg' or die "$!";
|
|< 1 2 3 >| | |
22 Einträge, 3 Seiten |
Schrift
Wie installiert man ein Modul?
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
![[Powered by Battie]](/battie/img/powered.png)
