diff --git a/fotostore.pl b/fotostore.pl
index 98c3621..e2c7abe 100755
--- a/fotostore.pl
+++ b/fotostore.pl
@@ -34,7 +34,9 @@ my $scales_map = $config->{'image_scales'};
 $scales_map->{$thumbs_size} = 1;
 
 #Sort and filter values for array of available scales
-my @scale_width = map { $scales_map->{$_} == 1 ? $_ : undef } sort {$a <=> $b} keys(%$scales_map);
+my @scale_width =
+  map { $scales_map->{$_} == 1 ? $_ : undef }
+  sort { $a <=> $b } keys(%$scales_map);
 
 my $sha = Digest::SHA->new('sha256');
 
@@ -89,26 +91,30 @@ get '/register' => ( authenticated => 0 ) => sub {
 };
 
 post '/register' => ( authenticated => 0 ) => sub {
-    my $self = shift;
-    my $username    = $self->req->param('username');
-    my $password    = $self->req->param('password');
+    my $self     = shift;
+    my $username = $self->req->param('username');
+    my $password = $self->req->param('password');
     my $fullname = $self->req->param('fullname');
-    my $invite = $self->req->param('invite');
+    my $invite   = $self->req->param('invite');
+
+    if ( $invite eq $config->{'invite_code'} ) {
 
-    if ($invite eq $config->{'invite_code'}) {
         #chek that username is not taken
         my $user = $db->get_user($username);
-        if ($user->{'user_id'} > 0) {
-            $self->render(template => 'error', message => 'Username already taken!');
-            return 0;    
+        if ( $user->{'user_id'} > 0 ) {
+            $self->render(
+                template => 'error',
+                message  => 'Username already taken!'
+            );
+            return 0;
         }
 
-        if ($fullname eq '') {
+        if ( $fullname eq '' ) {
             $fullname = $username;
         }
 
         my $digest = $sha->add($password);
-        $db->add_user($username, $digest->hexdigest(), $fullname);
+        $db->add_user( $username, $digest->hexdigest(), $fullname );
 
         #Authenticate user after add
         if ( $self->authenticate( $username, $password ) ) {
@@ -118,10 +124,11 @@ post '/register' => ( authenticated => 0 ) => sub {
             $self->render( template => 'error', message => 'Login failed :(' );
         }
 
-    } else  {
-        $self->render(template => 'error', message => 'invalid invite code');
     }
-}; 
+    else {
+        $self->render( template => 'error', message => 'invalid invite code' );
+    }
+};
 
 # Display top page
 get '/' => sub {
@@ -135,35 +142,50 @@ get '/get_images' => ( authenticated => 1 ) => sub {
     my $self = shift;
 
     my $current_user = $self->current_user;
-    my $user_id = $current_user->{'user_id'};
+    my $user_id      = $current_user->{'user_id'};
+
+    my $files_list = $db->get_files( $current_user->{'user_id'}, 20 );
+
+    my $thumbs_dir =
+      File::Spec->catfile( $IMAGE_DIR, $current_user->{'user_id'},
+        $thumbs_size );
 
-    my $files_list = $db->get_files($current_user->{'user_id'}, 20);
-    
-    my $thumbs_dir = File::Spec->catfile( $IMAGE_DIR, $current_user->{'user_id'}, $thumbs_size );
-    
     my @images = map { $_->{'file_name'} } @$files_list;
 
     my $images = [];
 
     for my $img_item (@$files_list) {
-        my $file = $img_item->{'file_name'};
+        my $file     = $img_item->{'file_name'};
         my $img_hash = {};
         $img_hash->{'filename'} = $img_item->{'original_filename'};
-        $img_hash->{'original_url'} =  File::Spec->catfile( '/', $IMAGE_BASE, $current_user->{'user_id'}, $ORIG_DIR, $file );
-        $img_hash->{'thumbnail_url'} =  File::Spec->catfile( '/', $IMAGE_BASE, $current_user->{'user_id'}, $thumbs_size, $file );
+        $img_hash->{'original_url'} =
+          File::Spec->catfile( '/', $IMAGE_BASE, $current_user->{'user_id'},
+            $ORIG_DIR, $file );
+        $img_hash->{'thumbnail_url'} =
+          File::Spec->catfile( '/', $IMAGE_BASE, $current_user->{'user_id'},
+            $thumbs_size, $file );
 
         my @scaled = ();
         for my $scale (@scale_width) {
-            if (-r File::Spec->catfile( get_path($user_id, $scale), $file )) {
-                push(@scaled, {'size' => $scale, 'url' => File::Spec->catfile( '/', $IMAGE_BASE, $user_id, $scale, $file )}) ;
+            if ( -r File::Spec->catfile( get_path( $user_id, $scale ), $file ) )
+            {
+                push(
+                    @scaled,
+                    {
+                        'size' => $scale,
+                        'url'  => File::Spec->catfile(
+                            '/', $IMAGE_BASE, $user_id, $scale, $file
+                        )
+                    }
+                );
             }
-            
+
         }
 
         $img_hash->{'scales'} = \@scaled;
 
-        push(@$images, $img_hash);
-    }    
+        push( @$images, $img_hash );
+    }
 
     # Render
     return $self->render( json => $images );
@@ -177,7 +199,7 @@ post '/upload' => ( authenticated => 1 ) => sub {
     # Uploaded image(Mojo::Upload object)
     my $image = $self->req->upload('image');
 
-    my $user = $self->current_user();
+    my $user    = $self->current_user();
     my $user_id = $user->{'user_id'};
     $self->app->log->debug( "user:" . Dumper($user) );
 
@@ -211,7 +233,8 @@ post '/upload' => ( authenticated => 1 ) => sub {
 
     # Image file
     my $filename = sprintf( '%s.%s', create_hash( $image->slurp() ), $ext );
-    my $image_file = File::Spec->catfile( get_path($user_id, $ORIG_DIR), $filename );
+    my $image_file =
+      File::Spec->catfile( get_path( $user_id, $ORIG_DIR ), $filename );
 
     # Save to file
     $image->move_to($image_file);
@@ -235,19 +258,20 @@ post '/upload' => ( authenticated => 1 ) => sub {
     my $original_width = $imager->getwidth();
 
     for my $scale (@scale_width) {
+
         #Skip sizes which more than original image
-        if ($scale >= $original_width) {
+        if ( $scale >= $original_width ) {
             next;
         }
 
         my $scaled = $imager->scale( xpixels => $scale );
 
-        $scaled->write(
-            file => File::Spec->catfile( get_path($user_id, $scale), $filename ) )
+        $scaled->write( file =>
+              File::Spec->catfile( get_path( $user_id, $scale ), $filename ) )
           or die $scaled->errstr;
     }
 
-    if ( !$db->add_file( $user->{'user_id'}, $filename,  $image->filename) ) {
+    if ( !$db->add_file( $user->{'user_id'}, $filename, $image->filename ) ) {
 
         #TODO: Send error msg
     }
@@ -278,9 +302,9 @@ sub create_hash {
 }
 
 sub get_path {
-    my ($user_id, $size) = @_;
+    my ( $user_id, $size ) = @_;
     my $path = File::Spec->catfile( $IMAGE_DIR, $user_id, $size );
-    unless (-d $path) {
+    unless ( -d $path ) {
         mkpath $path or die "Cannot create directory: $path";
     }
     return $path;