% layout 'default'; % title 'Zerobin -- View'; % my %times = (day => 1, week => 7, month => 30, quarter => 90, year => 395); % my @times = map { [l($_) => $times{$_}] } sort { $times{$a} <=> $times{$b} } keys(%times); % param 'expire' => 30; % my $syntax = (stash 'syntax') || []; % param 'syntax' => ''; % my %opts = (id => 'paste', name => 'paste');
Копипаст ↓↓↓ или файл →
<%= submit_button l('Save') %>
<% end %><%= l(ucfirst($result)) %>