projekt kivitendo

use File::Path ();

use List::MoreUtils qw(uniq);

use SL::DBUtils qw(selectfirst_hashref_query);

use version;

use Rose::Object::MakeMethods::Generic (

  foreach my $row (selectall_hashref_query($::form, $self->dbh, qq|SELECT id, $column FROM $table WHERE $column IS NOT NULL|)) {

    next if !$row->{$column} || (($row->{$column} =~ m{^<[a-z]+>}) && ($row->{$column} =~ m{</[a-z]+>$}));

    $new_content    =~ s{\r}{}g;

    $new_content    =~ s{\n\n+}{</p><p>}g;

    $new_content    =~ s{\n}{<br />}g;

use utf8;

use SL::DBUtils;

use parent qw(SL::DBUpgrade2::Base);

  foreach my $row (selectall_hashref_query($::form, $self->dbh, qq|SELECT id, $column FROM $table WHERE $column IS NOT NULL|)) {

    next if !$row->{$column} || (($row->{$column} =~ m{^<[a-z]+>}) && ($row->{$column} =~ m{</[a-z]+>$}));

    $new_content    =~ s{\r}{}g;

    $new_content    =~ s{\n\n+}{</p><p>}g;

    $new_content    =~ s{\n}{<br />}g;