How do you plan to solve it?
module sipo4 ( input CLK, input RST, input serial_in, output reg [3:0] Q ); always @(posedge CLK, posedge RST) begin if(RST) Q <= 4'd0; else Q <= {serial_in, Q[3:1]}; end endmodule