Use below code.
clc
clear all
%% Get the info
cd 'Images'
img_dir = dir('*.pgm');
cd ..
len_img = length(img_dir);
fileFmt = '.jpg'; % new file format
for i = 1 : len_img
% get the image one by one.
f = img_dir(i).name;
cd 'Images'
% read image
f1 = imread(f);
cd ..
% extracting file format
[pathstr, name, ext] = fileparts(f);
if strcmp(ext, '.pgm')
% Concatenate with new file format
imgCat = strcat(name, fileFmt);
cd 'NewImages'
% writing into new location
imwrite(f1,imgCat);
cd ..
end
end
