perl dancer 基础7

MVC

MVC(Model-View-Controller) 是一种架构，或者说是设计理念，不同语言有不同的实现，遵循此架构会有很多好处，但详细探讨已经超出了主题，有机会再聊

下面是大体的数据流向图

代码语言：javascript复制

MVC
    ------------------------  
   |                        V 
 ------      ----      ----------       -----       -- 
|client|<---|view|<---|controller|<--->|model|<--->|DB|
 ------      ----      ----------       -----       -- 

也有如此的

---

添加控制逻辑[C]

在dancer中 TEST-APP/lib/TEST/APP.pm 是起控制作用的，在 true 之前添加以下几行

代码语言：javascript复制

get '/check_backup' => sub{
	template 'check_class/check_database_backup';
};
post '/check_backup' => sub{
	my $mail_addr = param("email_addr");
	my @mail_list = split /n/,$mail_addr;
	my $tmp_resault = '';
	foreach(@mail_list){
		$_ =~ s/(^s |s $)//g;
		chomp($_);
		next if ($_ eq '');
		unless  (  $_ =~ /@163.com/ ){
		$tmp_resault .= "error receiver! pleaes retype!!!";
		last;
		}
		$tmp_resault .=`/home/dancer/bin/D_check_backup_for_db.pl  -p /home/dancer/bin/.passfile/abc_pass `;
	}
	return  '<pre>'.$tmp_resault.'</pre>';
	
};

mvc

0 人点赞