Ilya33

@font-face {
    font-family: MuseoSansCyrl;
    src: url('/fonts_dir/MuseoSansCyrl.eot');
    src: url('/fonts_dir/MuseoSansCyrl.eot?#iefix') format('embedded-opentype'),
         url('/fonts_dir/MuseoSansCyrl.woff') format('woff'),
         url('/fonts_dir/MuseoSansCyrl.ttf') format('truetype'),
         url('/fonts_dir/MuseoSansCyrl.svg#Vision') format('svg');
    font-weight: normal;
    font-style: normal;
}

$input.addEventListener("focusin",  function(){
    var val = $input.value;
    $input.value = '';
    $input.value = val;
});

$('.pups').each(function() {
	var ns = (parseInt(this.textContent) * 10).toString();
	var l = ns.length;
	var first = (l % 3 === 0) ? 3 : l % 3;

	var s = ns.substr(0, first);
	for(var i=first; i<l; i+=3) {
            s += ' ' + ns.substr(i, 3);
	}
  
  this.textContent = s;
})

use utf8;

my @a = (
    "Название HP MODEL описание",
    "название описание",
    "Название HP"
);

for my $str (@a) {
    $str = ucfirst(lc($str));
    $str =~ s/\b([a-zA-Z])/uc($1)/eg;
}

use strict;
use warnings;

use Array::Utils qw(:all);


open(my $fh_m, '<', 'master.txt') or
    die "Не смог открыть файл :(";
open(my $fh_f, '<', 'file.txt') or
    die "Не смог открыть файл :(";

open(my $fh_n, '>', 'new.txt') or
    die "Не смог открыть файл :(";
open(my $fh_nm, '>', 'newmaster.txt') or
    die "Не смог открыть файл :(";

my @m = map {s/\r?\n?$//r} <$fh_m>;
my @f = map {s/\r?\n?$//r} <$fh_f>;

my @diff = array_minus(@f, @m);

foreach(@m) {
    print $fh_nm "$_\n";
}

foreach(@diff) {
    print $fh_n "$_\n";
    print $fh_nm "$_\n";
}